Tela de Splash
Como colocar uma tela de Splash em minha aplicação.
Obrigado.
Obrigado.
Manjuneiro
Curtidas 0
Respostas
Adriano Santos
20/05/2003
Crie um form novo que será seu splash, agora entre em View >> Source e escreva o código em negrito como abaixo:
Você verá o source do seu projeto. Veja o exemplo
program Project1;
uses
Forms,
Unit1 in ´Unit1.pas´ ;
{$R *.RES}
begin
[b:66f94b0a7b] Splash := TSplash.Create(Application);
Splash.Show;
Splash.Update;[/b:66f94b0a7b] Application.Initialize;
Application.CreateForm(TForm1, Form1);
[b:66f94b0a7b] Splash.Free;[/b:66f94b0a7b]
Application.Run;
end.
//onde Splash é o nome do form do splash.
Você verá o source do seu projeto. Veja o exemplo
program Project1;
uses
Forms,
Unit1 in ´Unit1.pas´ ;
{$R *.RES}
begin
[b:66f94b0a7b] Splash := TSplash.Create(Application);
Splash.Show;
Splash.Update;[/b:66f94b0a7b] Application.Initialize;
Application.CreateForm(TForm1, Form1);
[b:66f94b0a7b] Splash.Free;[/b:66f94b0a7b]
Application.Run;
end.
//onde Splash é o nome do form do splash.
GOSTEI 0