Fenster immer im Vordergrund?

[City Light]

Hab den Fehler gefunden! *freu*

Hinter else fehlten noch begin und end;

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
begin
  if Form1.Visible = False then
  begin
    Form1.Visible := True;
    SetWindowLong(Handle, GWL_HWNDPARENT, Application.Handle);
  end
  else
  begin
  Form1.Hide;
  SetWindowLong(Handle, GWL_HWNDPARENT, 0);
  Edit1.SetFocus;
  end;
end;