Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls
    Delphi
    by City Light, 4. Mär 2003
  Ist es das was du suchst?
  //markierter Eintrag in ListBox in eigener Farbe
  
  procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
  begin
  with (Control as TListbox) do
  begin
  if odSelected in State then
  Canvas.Brush.Color := $00C08000;