Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi farbige Items in einer JvImageCombobox (https://www.delphipraxis.net/101696-farbige-items-einer-jvimagecombobox.html)

fylo 17. Okt 2007 14:02


farbige Items in einer JvImageCombobox
 
Liste der Anhänge anzeigen (Anzahl: 2)
Hallo,

ich benutze die JvImageCombobox von den Jedi's und möchte für jeden Item (JvImageItem) den ich hinzufüge nicht nur eine Bildchen zuweisen, sonden auch eine andere Schriftfarbe.

Die Items besitzen auch die Eigenschaft 'Font' doch leider sehe ich keine Veränderungen, wenn ich dort z.B. clRed zuweise. Auch mit der Eigenschaft 'ListPropertiesUsed[puFont]' habe ich schon rumgespielt, aber leider auch ohne Erfolg.

Hier mal ein kleiner Ausschnitt aus meinem Code:
Delphi-Quellcode:
JvImageComboBox1.Items.Clear;
for i:= 0 to 7 do begin
  JvImageComboBox1.Items.Add;
  JvImageComboBox1.Items[i].ListPropertiesUsed := JvImageComboBox1.Items[i].ListPropertiesUsed - [puFont];
  JvImageComboBox1.Items[i].Text := 'item_'+inttostr(i);
  if i = 3 then begin
    JvImageComboBox1.Items[i].Font.Color := clred;
    JvImageComboBox1.Items[i].ColorHighlight := clred;
    JvImageComboBox1.Items[i].Font.Style := JvImageComboBox1.Items[i].Font.Style + [fsbold];
  end else begin
    JvImageComboBox1.Items[i].Font.Color := cllime;
  end;
  JvImageComboBox1.Items[i].ImageIndex := 1+random(5);
end;
Hat vielleicht jemand einen Tip für mich?


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:02 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz