Logisches problem

[xZise]

Hi...

Vielleicht ganz ersichtlich:
Deiner:

Delphi-Quellcode:

 
if not ComboBox4.Items.IndexOf(ComboBox4.Text)> -1 Then
begin
  Combobox4.Items.Add(ComboBox4.Text);
end;

Pseudocode:

Code:

falls Position In Den Items Der ComboBox4 "nicht vorhanden" ist dann
  Füge Item mit dem Text der ComboBox4 hinzu

Und das jetzt zu Delphi:

Delphi-Quellcode:

 
if ComboBox4.Items.IndexOf(ComboBox4.Text) = -1 then  // Wenn ".IndexOf" "-1" ergibt, dann ist der Eintrag nicht vorhanden
begin
  Combobox4.Items.Add(ComboBox4.Text); // Füge ein Item hinzu (Hinweis: Wenn du es machst, während man den Text ändert, dann erstellt er ständig neue Einträge)
end;