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;