form1.enabled:=false geht nicht

[Hansa]

Hi,

eine Form:

Code:

procedure TForm2.Button1Click(Sender: TObject);
begin
  Form1.Enabled := true;
  Form1.Show;
  Form2.Enabled := false;
end;

nächste Form:

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Enabled := true;
  Form2.Show;
  Form1.Enabled := false;
end;

Beides ist sichtbar, zu minimieren usw. Das ist alles. Ist Form 1 aktiv, kann man Form2 nur anschauen und umgekehrt.

Gruß
Hansa