Combobox einen Item hinzufügen

[snears]

Guten Abend Delphifreunde,

mein Problem ist folgendes, hier aber ersteinmal der Code:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var x :Integer;
begin

if edit2.Visible = false then edit2.Visible := true;

if edit2.Visible = true then
begin

combobox4.Items.Add(edit2.text);

end;

Also das edit feld ist vorher unsichtbar und wird beim ersten Klicken des Buttons sichtbar, dann kann der User etwas hinschreiben und wenn er nochmal den Button klickt wird der Eintrag in die Combobox eingefügt.
Jetzt ist aber das Problem, das wenn er es hinzufügt ist zwischen den schon eingefügten und dem was der User hinzufügt eine Item welches leer ist also da steht nichts.

Kann mir jemand sagen wie das geändert werden kann?

mfg

snears

[mkinzler]

Dir Visible-Eigenschaft ist schon ein Boolean
Niemals auf Trur Prüfen, da True <> 0 bedeutet.

Delphi-Quellcode:

edit2.Visible := not edit2.Visible;
if edit2.Visible then
begin

    combobox4.Items.Add(edit2.text);

end;

[himitsu]

Delphi-Quellcode:

if edit2.Visible then
  combobox4.Items.Add(edit2.text);
edit2.Visible := not edit2.Visible;

Und vermutlich auch noch die Reihenfolge ändern.