Hallo.
Ich möchte in meinem Programm ein Formular von Hand erzeugen und starten. So weit so gut, klappt auch alles! Allerdings habe ich in der
OH durch Zufall eine andere Version gefunden. Welchen Code würdet Ihr empfehlen?
Delphi-Quellcode:
// Code 1 - wie ich das sonst immer gemacht habe
Application.CreateForm(TForm1, TestForm);
TestForm.Caption := 'TestForm';
TestForm.Update;
TestForm.ShowModal;
TestForm.Free;
Delphi-Quellcode:
// Code2 abgeändert aus der OH
with TForm1.Create(
nil)
do
try
Caption:= '
TestForm';
Update;
ShowModal;
finally
Free;
end;