Erstanwendung nach Start der Zweitanwendung schließen

[Avax2k]

Ich möchte, dass meine Erstanwendung nach dem Aufruf der Zweitanwendung, sich automatisch schließt
den befehl zum Laden der zweitanwendung habe ich auf einen Button gelegt der wie folgt aussieht:

Zitat:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Edit1.Text = Edit2.Text then
winexec(PCHar('WINVER.EXE'), SW_SHOWNORMAL)
else Label1.Caption := 'klappt nicht';
end;

habe folgendes versucht:

Zitat:

winexec(PChar('WINVER.EXE'), SW_SHWONORMAL) AND Form1.Close
else...

aber so wird der else Befehl gar nicht mehr akzeptiert.
Wäre super wenn jemand von Euch eine Lösung parat hätte gleich mit Quellcode.