Schriftfarbenwechsel von TListItem, bei klick auf Checkbox des Items in TListView

[Kevinpptx]

Zitat von DeddyH:

So etwas hast Du schon versucht?

Delphi-Quellcode:

procedure TFormBlubb.ListViewBlaCustomDrawItem(Sender: TCustomListView; Item: TListItem;
  State: TCustomDrawState; var DefaultDraw: Boolean);
begin
  if Item.Checked then
    Sender.Canvas.Font.Color := clGreen
  else
    Sender.Canvas.Font.Color := clRed;
end;

 Item.Checked habe ich gar nicht bedacht , da habe ich mal wieder viel komplizierter gedacht, als notwendig...

Also funktioniert hat es, danke vielmals!