Einzelne Textzeilen in ListView färben?

[MCXSC]

Hallo,

ist es möglich, in der Report-Ansicht der ListView bestimmte Zeilen (nur den Text der Zeilen) zu färben? Das ist z.B. in WinXP möglich, wenn man Dateien komprimiert.

Ist dies irgendwie möglich?

Danke im vorraus, MCXSC

[Luckie]

Wird dir nichts weiter übrigbleiben als die Items selber zu zeichen.

[MCXSC]

Und wie mache ich das?!

Geht das nicht irgendwie über die "CommCtrl_Fragment"?

[marabu]

So mache ich das in meinen Programmen:

Delphi-Quellcode:

procedure TVerForm.ListViewCustomDrawItem(Sender: TCustomListView;
  Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
var
  condition: boolean;
begin
  inherited;
  condition := ... ;
  if condition 
    then with Sender.Canvas.Font do Color := clMaroon
    else with Sender.Canvas.Font do Color := clBlack;
end;

Grüße vom marabu

Überflüssiges then entfernt

[Luckie]

Zitat von MCXSC:

Und wie mache ich das?!

Geht das nicht irgendwie über die "CommCtrl_Fragment"?

Falls du von der Unit redest, die Mathias Simmack für die "Win32 API Tutorials für" Delphi geschrieben hat, dann nein. Da sind nur deklarationen drin, die Delphi noch nicht kennt.

[turboPASCAL]

Hier kannst Du auch mal schauen oder: Listview AND Farbe