Einzelnen Beitrag anzeigen

Benutzerbild von Corpsman
Corpsman

Registriert seit: 8. Nov 2005
Ort: nähe Stuttgart
981 Beiträge
 
Delphi XE2 Professional
 
#5

Re: StartForm schließen!!!

  Alt 20. Sep 2007, 17:26
Blicke ich das

du willst sagen wir Form1 anzeigen dann schliesen und mit Form2 weiterarbeiten ?


Delphi-Quellcode:

begin
  Application.Initialize;
  Application.CreateForm(Tform1, form1);
  Application.CreateForm(Tform2, form2);
  Application.Run;
end.
So sah das dann mal aus

und das wird dann zu

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.CreateForm(Tform2, form2);
  Application.Run;
end.
Delphi-Quellcode:
Procedure TForm2.create(Sender:Tobject);
begin
  Application.CreateForm(Tform1, form1);
// und dann irgendwann Form1.showmodal
// und nach dem Modalen kannst dann Form1.Destroy oder so aufrufen.
end;
So würde ich es mal Probieren ...
Uwe
My Sitewww.Corpsman.de

My marble madness clone Balanced ( ca. 70,0 mb ) aktuell ver 2.01
  Mit Zitat antworten Zitat