TColorListBox neuer Eintrag

[maximus Caesar]

Hallo!
Wie kann ich in einer ColorListBox einen neuen Eintrag hinzufügen?
Ich bin soweit das ich mit

Code:

i:=ColorListBox1.Items.Add('Blau');

zwar einen neuen Eintrag hinbekomme, kann diesem aber keine Farbe zuweisen, er erscheint nur Schwarz.
Hier z.B. möchte ich ihm clBlue zuweisen.

MfG
maximus Caesar

[Khabarakh]

Hai Arne, für dich starte ich sogar mal wieder Delphi :zwinker: .
Jedem Eintrag einer TStrings-Liste lässt sich noch ein Pointer zuordnen. TColorListBox nimmt als Farbe einfach den Wert dieses Pointers:

Delphi-Quellcode:

ColorBox1.AddItem('My favorite color', TObject(clPurple)); // was nichts anderes macht als TStrings.AddObject von Items aufzurufen.

[maximus Caesar]

Vielen Dank!
Richtig gedacht, aber falsch ausgeführt :oops: