Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Filelist Zeile färben

    Delphi
    by Sunlight7, 25. Nov 2006
  Das Beispiel kann mal net funktionieren, weil Du es im FormCreate stehen hast :wink:
  Dazu müsstest Du es in dem OnClick Ereignis von der ListBox machen.
  
  Im OnDrawItem kannst Du die Einträge selbst Zeichnen, und dazu eine Farbe auswählen.
  
  N' Beispiel zu OnDrawItem:
  procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);
  begin
  With...
• Forum: Object-Pascal / Delphi-Language

  Re: Filelist Zeile färben

    Delphi
    by Sunlight7, 25. Nov 2006
  Warum so umständlich?
  Da es nur zwei Farben sind genügt ein einfaches Odd :wink:
  Und wozu eine for-Schleife? :gruebel:
  
  If Odd(Index) then
  MaleRot else
  MaleGrün
  
  Du kannst dafür das Ereignis OnDrawItem einer ListBox verwenden, wenn Du im OI Style auf lbOwnerDrawFixed stellst :wink:
  Das funkt aber net mit der TFileListBox Kompo, dazu selber eine TListBox machen.