Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Farbige Listbox

    Delphi
    by Hansa, 29. Dez 2007
  Eine Listview verwenden, um die Sachen wesentlich komplizierter zu machen, die die Listbox schon hat, oder wie ? :shock:
  
  procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
  begin
  if Index mod 2 = 0 then begin
  Listbox1.Canvas.Brush.Color := clRed;
  Listbox1.Canvas.FillRect(Rect);
  Listbox1.Canvas.TextOut(Rect.Left,...