Fórum Tela Splash no delphi #257706
09/11/2004
0
Luisandro
Curtir tópico
+ 0Posts
09/11/2004
Reginaldo174
form2.show;
form2.update;
.
.
.
form2.hide;
form2.free;
Application.Run;
e Instale ActiveX showaveFlash e coloque no form2 que será seu splash.
Gostei + 0
12/11/2004
Luisandro
Gostei + 0
13/11/2004
Luisandro
Gostei + 0
13/11/2004
Mssilva
Click em Project-> View Source.
Em uses só deve ter a clausula Forms, acrescente também (Windows e Dialogs)
Código
Application.Initialize;
frmAbertura := TfrmAbertura.create(application);
frmAbertura.Label1.Caption := ´Ex: Seu no telefone´;
frmAbertura.Label2.Caption := ´Criando Ambiente do Aplicativo, Aguarde...´;
frmAbertura.Show;
Application.Title := ´Da aplicação´;
frmAbertura.Progresso.Position:=(10);
frmAbertura.Refresh;
Esse código e para o forme splash.
para criar os outros form da aplicação o código e esse
Application.CreateForm(TFrom + nome, From + nome);
frmAbertura.Label2.Caption:= ´Criando o form x, Aguarde...´;
frmAbertura.Progresso.Position:= (20);
frmAbertura.Refresh;
Quando for o último forme.
frmAbertura.Hide;
Application.Run;
end.
Há progresso é uma ProgressBar que coloquei no form + 2 labels ok.
Qualquer dúvida estou no message = mpssistemas@hotmail.com
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)