[DELPHI] SPLASH SCREEN - TELA DE ABERTURA DA APLICAÇÃO

Vamos criar uma tela de Splash no Delphi, para quem não sabe, tela de Splash é a tela que aparece antes da aplicação principal, que pode conter várias informações, logo da empresa, informações do desenvolvedor do programa, contatos, barra de progresso de carregamento do programa principal, etc.

1. Abra o Delphi e crie um novo projeto através do menu File -> New -> VCL Forms Application - Delphi, que será usado como a tela principal do sistema.

2. Altere as propriedade do Form conforme abaixo:

Caption     = Tela Principal
Name        = Frm_Principal
Position    = poDesktopCenter
WindowState = wsMaximized

3. Salve as alterações (File -> Save All), coloque o nome uPrincipal para Unit e Principal para o nome do projeto.

4. Crie um novo Form através do menu File -> New -> Form - Delphi, que será usado como tela de Splash.

5. Altere as propriedade do Form conforme abaixo:

BorderStyle  = bsNone
Caption      = Deixe em branco
ClientHeigth = 270
ClienteWidth = 420
Name         = Frm_Splash
Position     = poDesktopCenter

Obs.: acrescente uma imagem ou outas informações que julgar importante para a tela de Splash.

6. Salve as alterações, coloque o nome uSplash para Unit.

7. Acesse o menu Project -> View Source para exibir o código fonte do projeto.

8. Inclua na seção Uses: SysUtils.

9. Deixe o código igual ao exemplo abaixo:

program Principal;

uses
  Forms,
  SysUTils,
  uPrincipal in 'uPrincipal.pas' {Frm_Principal} ,
  uSplash in 'uSplash.pas' {Frm_Splash};

{$R *.res}

begin
Frm_Splash := TFrm_Splash.Create(Application);
try
Frm_Splash.Show;
Frm_Splash.Update;
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TFrm_Principal, Frm_Principal);
//Aguarda 2 segundos (opcional)
Sleep(2000);
finally
FreeAndNil(Frm_Splash);
end;
Application.Run;
end.

10. Pronto, a tela de Splash da aplicação está pronta, execute a aplicação para ver o resultado.

Gostou? Deixe seu comentário... Convido você a seguir meu blog, sua presença é bem vinda!【ツ】

Nenhum comentário:

Postar um comentário