|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
Delphi 11 Alexandria
|
18. Okt 2002, 17:13
Moin sakura,
geht trotzdem 
Wenn auch nur mit einem "schmutzigen" Trick:
Code:
[b]var[/b]
p : ^Pointer;
[b]begin[/b]
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Form3.HandleNeeded;
p := @Application.MainForm;
p^ := Form3;
Application.Run;
[b]end[/b].
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|