FREE PASCAL- habe ein Problem-Passworrt Programm

[mcrool2010]

Hallo könnte mir jemand helfen?
also ich wollte, dass wenn man auf ein OK button klickt und das, was in der Edit Box mit dem übereinstimmt, was ich vor her als "Passwort" eingegeben hab man auf ein neues Fenster kommt, wenn es falsch ist auf ein anderes. Wie mach ich das? ich hab ein Fehler drin aber weiß nicht was?


hier mein Code:´

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin

if Edit1.text ='passwort123'
 then Form1.Hide;
  Form2.Show;
else if Edit.Text ='passwort1234'
then Form1.Hide;
  Form3.Show;
end;