Einzelnen Beitrag anzeigen

Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: ListView: Selbst geschriebene Zelle markieren

  Alt 8. Apr 2007, 10:28
Hallo,
Zitat von Helmi:
so - ich hab nochmal gefeilt:
so schauts bestens aus:
Delphi-Quellcode:
//Hintergrundfarbe und Textfarbe setzen, wenn die Zeile markiert ist
If Item.Selected then
  begin
     Brush.Color := clMenuHighlight;
     Font.Color := clBlack;
  end;
Delphi-Quellcode:
If Item.Selected then
begin
  Brush.Color := clHighlight;
  Font.Color := clHighlightText;
end;
so wäre es glaube ich korrekter.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat