Verschiedene Farben einzelner Items in ComboBox

[sebastian1979]

Hallo,

ich möchte gerne mehrere ITEMS mit verschiedenen Hintergrundfarben in einer ComboBox darstellen.
Leider habe ich bislang keine vernünftigen Lösungsansatz gefunden.

Die einzelnen Einträge sollen hinterher zur Laufzeit erstellt werden
und Text und Farbe aus der Datenbank übernehmen. Die Datenbank ist nicht das Problem,
ich weiß einfach nicht wie die die einzelnen Items ansprechen soll.

Delphi-Quellcode:

...
  combobox1.Items.Clear;
  combobox1.Items.Add('test1'); (z.B. rot)
  combobox1.Items.Add('test2'); (z.B. gelb)
  combobox1.Items.Add('test3'); (z.B. grün)
...

Habe auch schon das Ereignis DrawItem probiert...ohne Erfolg...es ändert sich gar nichts.

Delphi-Quellcode:

procedure TMHauptmaske.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  Combobox1.Canvas.Brush.Color := clred;
end;

So ähnlich habe ich es bereits bei einem DBGrid hinbekommen, aber nicht mit der Combobox.

Ich hoffe mir kann jemand weiter helfen.

Vielen Dank.

[edit=Matze][delphi]-Tags eingefügt, da der Themenersteller den Beitrag nicht mehr editieren kann. MfG, Matze[/edit]