und wenn das ganze dynamisch ist kann man sich die globale Variable auch sparen:
Delphi-Quellcode:
procedure TMainForm.ButtonClick(Sender: TObject);
var
lForm: TFormTest;
begin
lForm := TFormTest.Create(nil); //oder Application.CreateForm(TFormTest, lForm);
try
lForm.ShowModal();
finally
lForm.Free;
end;
end;
ganz wichtig ist das ShowModal in dem Falle denn sonst wird das Form ja erzeugt angezeigt und sofort wieder zerstört. Das ganze geht so fix das man am ende nicht mal was davon sieht.