opstart vindue

Tags:    delphi

User
Bruger #702 @ 04.01.02 12:52
Hej

er der nogen der kan fortælle mig hvordan jeg kan lave et opstart vindue når mit programme
start op det er der mange progarmmer der har

Tak???????



3 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
<quote>Hej

er der nogen der kan fortælle mig hvordan jeg kan lave et opstart vindue når mit programme
start op det er der mange progarmmer der har

Tak???????</quote>

Først skal skal du lave vinduet som en AboutBox.
Så skal du gå ind i Project -> View source.
Under {$R *.RES} Skal du lave en "var",

og under den skriver du:

AbuotBox: TAboutBox;

Under Application.Initialize; skriver du:

AboutBox := TAboutBox.Create (Application);
try
AboutBox.Show;

Under Application.CreateForm(TForm1, Form1); skriver du:

AboutBox.Close;
finally
AboutBox.Free;
end;

Så sletter du Application.CreateForm(TAboutBox, AboutBox);

Emil Melgaard
<p><a href="mailto:emil.melgaard@private.dk">emil.melgaard@private.dk</a></p>



<quote>Hej

er der nogen der kan fortælle mig hvordan jeg kan lave et opstart vindue når mit programme
start op det er der mange progarmmer der har
</quote>

Prøv at kigge på http://www.borland.com/devsupport/delphi/devcorner/techtips/splash.html[Redigeret d. 05/01-02 03:41:48 af Lasse M]



<quote>Hej

er der nogen der kan fortælle mig hvordan jeg kan lave et opstart vindue når mit programme
start op det er der mange progarmmer der har

Tak???????

Først skal skal du lave vinduet som en AboutBox.
Så skal du gå ind i Project -> View source.
Under {$R *.RES} Skal du lave en "var",

og under den skriver du:

AbuotBox: TAboutBox;

Under Application.Initialize; skriver du:

AboutBox := TAboutBox.Create (Application);
try
AboutBox.Show;

Under Application.CreateForm(TForm1, Form1); skriver du:

AboutBox.Close;
finally
AboutBox.Free;
end;

Så sletter du Application.CreateForm(TAboutBox, AboutBox);

Emil Melgaard
<p><a href="mailto:emil.melgaard@private.dk">emil.melgaard@private.dk</a></p></quote>

Det tror jeg ikke der var mange der forstod så meget af. Måske kunne du forklare det lidt bedre!!

--
Soccoro
http://www.hk-webactive.cjb.net
http://www2002105.thinkquest.dk



t