Neustart

[larsder4]

Hey Leute,

ich hab mal ne kleine dumme Frage, die Antwort wurde hier sicher schon 100 Mal geschrieben, aber ich weiß nicht, wonach ich suchen soll...

Wie kann ich mein Programm neustarten, also an den Anfang zurücksetzen, sozusagen FormCreate noch einmal ausführen...

Ihr wisst schon was ich meine :wink:

Danke im Vorraus
Lars

[mkinzler]

Einfach

Delphi-Quellcode:

Form.Free;
Form := <Form-Klasse).Create;

[toms]

Zitat:

Zitat von mkinzler

Einfach

Delphi-Quellcode:

Form.Free;
Form := <Form-Klasse).Create;

Dies funktioniert jedoch nur mit Unterforms. Bei der Hauptform jedoch nicht.

[larsder4]

Es soll aber im Hauptform sein.
Ich kam mit dem Vorschlag auch nicht so recht weiter...

Mein Quelltext sieht ungefähr so aus:

Delphi-Quellcode:

if MessageDlg('Noch einmal?', mtWarning, [mbYes, mbNo], 0) = mryes then
begin
//Neustart
end
else
Form1.Close;

[Fussball-Robby]

Wilst du die ganze Anwendung neustarten? Das ginge so:

Delphi-Quellcode:

procedure Neustart;
begin
  PostMessage(Application.Handle, WM_CLOSE, 0, 0);
  ShellExecute(0, 'open', PChar(ParamStr(0)), nil, nil, SW_SHOW);
end;

Mfg

[mkinzler]

Man könnte auch nur .Create() noch einmal aufrufen, dann wird es nicht als Konstruktor, sondern als Klassenmethode angewendet

[tomsel]

Warum willst du denn unbedingt FormCreate noch mal ausführen? Du könntest doch einfach eine Methode schreiben, die bei Klick auch "Nochmal" alles "auf Anfang" setzt, ohne Neustart. Diese würde ich dann zusätzlich auch aus FormCreate aufrufen.

[larsder4]

Das war nur mein erster Gedanke mit dem FormCreate.

Wie sollte das denn ungefähr aussehen?


Bei dem Vorschlag von mkinzler

Delphi-Quellcode:

Form1.Create(); //wenn er das so meinte

kommt die Meldung: Nicht genügend wirkliche Parameter.
Allerdings weiß ich nicht so recht, was in die Klammern muss (Sender: TObject) geht ja nicht.

[mkinzler]

Delphi-Quellcode:

Form1.Create( Form1.Owner);

[Fussball-Robby]

Frage: Was willst du damit überhaupt erreichen? Es gibt bestimmt einen besseren Weg, als das Create nochmal aufzurufen.