Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by FAlter,
2. Jun 2008
Hi,
nein, dein Hinzufügen ist korrekt.
Kontrollier mal, ob du an alles gedacht hast (OwnerDraw gesetzt, Code an deinen Komponentennamen angepasst*..., Ereignis korrekt eingestellt (muss im Objektinspektor unter Ereignisse -> OnDrawItem stehen)).
Mfg
FAlter
*) Evtl. wäre es auch sinnvoll, den Parameter Control zu verwenden. Dann kann man den Code auch für mehrere ComboBoxen nutzen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by FAlter,
2. Jun 2008
Hi,
auf "leere" Inhalte war mein Code nicht vorbereitet. Aber was spricht dagegen, einfach ein if Item.Count > 0 then begin ... end hinzusetzen?
Jedenfalls hast du ein leeres Item in deiner ComboBox drin, also ''.
Ansonsten kannst du den Inhalt auch schon per Objektinspektor setzen.
Mfg
FAlter
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by FAlter,
2. Jun 2008
Hi,
ich hätte es auch mit Owner Draw erledigt, allerdings scheint mir der Code von Torry ein wenig lang. Zum auseinanderpfriemeln könnte man TStringList.DelimitedText verwenden oder - was sogar bei älteren Delphis geht - CommaText. Dadurch wird der Code gleich übersichtlicher (wenn auch evtl. langsamer, aber das stört in diesem Fall kaum, da es nicht bemerkt wird).
Hier ein kurzes Beispiel:...