Delphi TListview OwnerDraw SubItems - изменить шрифт по умолчанию (он выделен жирным шрифтом после рисования на холсте)

Если вы используете ownerdraw с TListView, то все подэлементы как-то по умолчанию являются шрифтом BOLD, даже если для listview font.style установлено значение [], для всех подэлементов, следующих за пользовательским.

Обходной путь, который я нашел, заставляет набор стилей в событии CustomDrawSubItem:

ListView2.Canvas.Font.Style := [fsItalic];
ListView2.Canvas.Font.Style := [];

(простой звонок с [] выигралне работает, если стиль по умолчанию не установлен на что-то отличное от [], потому что вызов SetStyle не 'думаю стиль изменился)

Это, однако, некрасивое исправление, которое требует дополнительного времени обработки. Есть ли лучшее решение?

Демо-проект:http://www.mediafire.com/?v8bsdpvpfqy47vnI»

Ответы на вопрос(2)

Ваш ответ на вопрос