Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.336 Beiträge
 
Delphi XE2 Professional
 
#6

Re: Farbe einer Spalte in ListView ändern

  Alt 8. Apr 2007, 11:42
Hallo,

ich muss diesen Thread nochmal aufgreifen.

In meiner ersten Spalte sind nur die CheckBoxen und kein Text.
Wenn nun eine Zeile ausgewählt wird, dann wird auch die CheckBox selectiert dargestellt.
Das möchte ich aber nicht.
Deswegen dacht ich mir, ich könnte die 1. Spalte neu zeichnen.
Nur leider funktioniert das nicht so wie ich mir das vorstell.

Delphi-Quellcode:
procedure TMainForm.ListView_DateienCustomDrawSubItem(Sender: TCustomListView;
  Item: TListItem; SubItem: Integer; State: TCustomDrawState;
  var DefaultDraw: Boolean);
begin
  If SubItem = 0 then
    Listview_Dateien.Brush.Color := clRed;
end;
Das geht leider nicht (clRed ist nur testweise dort).

Wie könnt ich die 1. Zeile ändern?
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat