ComboBox Inhalt auslesen?

[AlexII]

Hallo,

ich habe meine ComboBox so eingestellt, dass ich da ein String manuell reinschreibe kann. Der ItemIndex bleibt dabei beim -1... aber den Inhalt von ItemIndex = -1 kann Delphi nicht lesen. Was mache ich nun? Wie lese ich das aus, was reingeschrieben wurde?

CategoryComboBox.Items.Strings[-1]; // Fehler

Danke!

[freak4fun]

CategoryComboBox.Text

[AlexII]

Zitat von freak4fun:

CategoryComboBox.Text

Habe ich schon versucht, aber da die ComboBox nicht leer ist, also da befinden sich schon ein Paar Einträge, wird einfach alles ausgegeben. Und ich brauche ja nur das was zuletzt manuell eingegeben wurde. Diese Methode kommt also nicht in Frage.

[Sir Rufo]

Zitat von AlexII:

Zitat von freak4fun:

CategoryComboBox.Text

Habe ich schon versucht, aber da die ComboBox nicht leer ist, also da befinden sich schon ein Paar Einträge, wird einfach alles ausgegeben. Und ich brauche ja nur das was zuletzt manuell eingegeben wurde. Diese Methode kommt also nicht in Frage.

Und du bist dir sicher, dass du nicht CategoryComboBox.Items.Text versucht hast?
Vergleiche es besser nochmal:

Delphi-Quellcode:

CategoryComboBox.Items.Text
CategoryComboBox.Text

[mkinzler]

Das was Du reingeschrieben hast steht in Text. Es wird nichts automatisch in ein Item geschrieben.

[AlexII]

Zitat von Sir Rufo:

Und du bist dir sicher, dass du nicht CategoryComboBox.Items.Text versucht hast?
Vergleiche es besser nochmal:

Delphi-Quellcode:

CategoryComboBox.Items.Text
CategoryComboBox.Text

Tatsächlich, habe es verwechselt...
Aber jetzt läuft es, thx

[Sir Rufo]

Zitat von AlexII:

Tatsächlich, habe es verwechselt...
Aber jetzt läuft es, thx

"Vertan, vertan!" sprach der Hahn und stieg von der Ente.

[AlexII]

Hehe...


Nun aber weitere Frage, wenn der eingegebene String mit dem übereinstimmt was schon vorhanden ist, wie kann ich den ItemIdex auf den vorhandenen String setzen?

[mkinzler]

Schau Dir mal .IndexOf() an

[AlexII]

Kann ich dann wie folgt alle Schritte mit den Strings in der CB durchgehen?

Delphi-Quellcode:

  if (CategoryComboBox.ItemIndex = -1) and (CategoryComboBox.Text <> '') and (CategoryComboBox.Items.IndexOf(CategoryComboBox.Text) = -1) then
  begin

    showmessage('Manuell reingeschrieben, String sonst in der CB nicht vorhanden');

  end else if (CategoryComboBox.ItemIndex = -1) and (CategoryComboBox.Items.IndexOf(CategoryComboBox.Text) <> -1) then
  begin

    showmessage('Manuell reingeschrieben, String in der CB vorhanden');

  end else if CategoryComboBox.ItemIndex <> -1 then
  begin

    showmessage('String in der CB ausgewählt');

  end else showmessage('CB nicht angefasst!');