Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Зачеркивание строки в строке TListView

Автор: winsoft 4.11.2006, 00:14

Добрый день! Скажите, пожалуйста, как сделать так, чтобы при нажатии на чекбокс в TListView (режим vsReport) вся строка зачеркивалась. Подобный механизм, я видел, реаизован в To-Do листе в Delphi 7.
Помогите, пожалуйста, битый час бьюсь уже над этой проблемой smile

Автор: dumb 4.11.2006, 05:52

в обработчик OnCustomDrawItem:

Код


  if Item.Checked then begin
    ListView1.Canvas.Font.Color := clGray;
    ListView1.Canvas.Font.Style := [fsStrikeOut];
  end;