combobox items aktualisieren/hinzufügen geht nicht

[oldmax]

Hi
Ich hab zwar nicht wirklich verstanden, was du ItemIndex übergeben willst, aber ein Eintrag in eine Combobox sollte folgendermaßen gehen:

Delphi-Quellcode:

if key=#13 then 
Begin
  if (Sender is TCombobox) then 
  begin
    (Sender as TCombobox).Add((Sender as TCombobox).Text); /7 Text in Liste eintragen
    (Sender as TCombobox).ItemIndex:=(Sender as TCombobox).IndexOf((Sender as TCombobox).Text); // ItemIndex setzen
  end;
end;

Geht aber bestimmt noch viel einfacher.....


edit: Nachtrag
Um doppelte Einträge zu vermeiden, solltest du über IndexOf erst abfragen, ob der Eintrag schon vorhanden ist. Nur bei kleiner 0 ( muß ich ausschreiben, da meine Tastatur dieses Zeichen nicht zuläßt ??) ist dieser Eintrag noch nicht vorhanden und kann über Add hinzugefügt werden.
Gruß oldmax