После активации скина, если sListView1 = vsList, не работает код изменения цвета шрифта при уходе фокуса с элемента ListView
procedure TForm1.sListView1CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Item.Focused or (Item.Selected and not Item.ListView.MultiSelect) then
Sender.Canvas.Font.Color := clRed
else
Sender.Canvas.Font.Color := clWindowText;
end;
При это, если sListView1 = vsIcon, то работает. Баг?