Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#6

AW: TListView Zelle färben, BUG oder ein Fehler von mir?

  Alt 30. Apr 2013, 14:26
da läuft IMHO irgendetwas mit dem Setter von Brush.Color schief wenn
ListView.Color = gesetzter Farbe im CustomDrawSubItem ist.

Ich kann im Moment nur einen Workaround anbieten ...

Delphi-Quellcode:
begin
  if SubItem = 7 then
  begin
    Sender.Canvas.Brush.Color:=clRed;
  end
  else
  begin
    Sender.Canvas.Brush.Color:=$00F7F7F6; // entweder Wechsel erzwingen
    Sender.Canvas.Brush.Color:=$00F7F7F7;
    //oder auch das Handle "anfassen" Sender.Canvas.Brush.Handle:= Sender.Canvas.Brush.Handle;
  end;

end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat