TComboBoxEx will keine Items

[Neutral General]

Hi,

Also so langsam versteh ichs nicht. Habe auch hier in der DP gesucht. Ich erzeuge eine ComboBoxEx zur Laufzeit so:

Delphi-Quellcode:

cbChooseElement := TComboBoxEx.Create(Self);
with cbChooseElement do
begin
  Parent := ValueListEditor1;
  Left := ValueListEditor1.CellRect(1,3).Left;
  Top := ValueListEditor1.CellRect(1,4).Top;
  Width := ValueListEditor1.CellRect(1,4).Right - ValueListEditor1.CellRect(1,4).Left;
  Anchors := [akLeft,akRight,akTop];
  Font.Name := 'SimSun';
  Style := csExDropDownList;
end;

Jetzt habe ich versucht Items hinzuzufügen. Probierte Varianten:

Delphi-Quellcode:

// Methode 1
var ExItem: TComboExItem;
ExItem := cbChooseElement.ItemsEx.Add;
Exitem.Caption := 'Test';
// Methode 2 (bzw 1b)
with cbChooseElement.ItemsEx.Add do
  Caption := 'Test';
// Methode 3 
cbChooseElement.Items.Add('Test');
// Methode 4
cbChooseElement.ItemsEx.AddItem('Test',-1,-1,-1,0,nil);

Es funktioniert alles nichts. Zur Laufzeit passiert nichts wenn ich auf den "Aufklapppfeil" klicke...

Gruß
Neutral General