Delphi-PRAXiS - Delphi TComboBox mit csOwnerDrawVariable und Einträge

Hallo,

ich benutze auf einem Formular mehrere TComboBox(es). Einige im Sytle mit csDropDown(List) und einige eben mit csOwnerDrawVariable. Letztere bekommen Einträge mit unterschiedlichen Farben. Soweit so gut.

Jetzt möchte ich aber, dass die ComboBoxen zumindest in der Höhe einheitlich aussehen. Bei mir (TurboDelphi) ist es aber so, dass die TComboBox standardmäßig Height auf 24 gesetzt hat und wenn ich den Style auf csOwnerDrawVariable setze, wird 22 draus. Das lässt sich nicht ändern und sieht dann sehr unschön aus, zumal auch die Schriftgrößen per default unterschiedlich sind.

Wie bekomme ich das auch auf 24?

[edit] Habe es selbst herausgefunden. Man muss nur die Eigenschaft ItemHeight auf 18 setzen. Dann passt es.

Wie schaffe ich es aber, dass ich die Einträge zur Laufzeit wie bei TEdit (Style:=csDropDown) vom Benutzer eintragen (lassen) kann?

Gruß, Alex