Tela de splash

Question

Minhas telas de splash, que eu fa�o, dependendo da velocidade do micro, elas nem aparecem. Como fazer uma tela, mas que possa ter uma intera��o com o usu�rio, apenas para efeito visual. Claro que isso...

Bruno Belchior · Answer

tente isso:[code:1:e05beed395]frmSplash:=TfrmSplash.Create(Application); frmSplash.Show; Application.Initialize; try Application.CreateForm(TfrmM_Principal, frmM_Principal); Application.CreateForm(TfrmM_Cadastro, frmM_Cadastro); Application.CreateForm(TDm, Dm); Application.CreateForm(TfrmCadFornec, frmCadFornec); Application.CreateForm(TfrmVenda, frmVenda); Application.CreateForm(TfrmCadBanco, frmCadBanco); Application.CreateForm(TfrmCadProduto, frmCadProduto); Application.CreateForm(TfrmCadGrupo, frmCadGrupo); Application.CreateForm(TfrmCadNf, frmCadNf); Application.CreateForm(TfrmCadItens, frmCadItens); Application.CreateForm(TfrmCadVendedor, frmCadVendedor); Application.CreateForm(TfrmSplash, frmSplash); finally Sleep(2000); // Insira esta linhafrmSplash.Close; end; Application.Run;[/code:1:e05beed395]Quanto mais vc aumentar o par�metro do procedimento, mais tempo ele ficar� *esperando*, lembre-se que o procedimento citado acima esta na unidade [b:e05beed395]SysUtils[/b:e05beed395]......

Paulo · Answer

Fiz, com rela��o ao tempo de espera, funciona, � isso mesmo que eu quero, grato. Mas tem um porem, n�o me aparece nada(a imagem), somente o contorno do form, com fundo clBtnFace. Tirei o TImge, coloquei v�rios labels dentro de v�rias cores, sem nenhum componente, e nada, continua so o formato do form. Aumentei para 1 minuto(com teste) e tamb�m n�o me apareceu.

Tnaires · Answer

Ol�Faltou vc colocar a seguinte instru��o, logo depois da chamada ao Show:[code:1:791fa3f742]FrmSplash.Update[/code:1:791fa3f742]...

Armando.boza · Answer

eu sempre fa�o assim:1- Crio um form para ser o Splash2- Acrescento um Ttimer com as op��es ENABLED = false e INTERVAL = 30003- No evento onshow do splash coloco TIMER1.enabled := true;4- D� 2 cliques no timer1 e coloque CLOSE no evento.5- No form principal coloque assim no evento ONCREATE: FRMSplash.showmodal;Ele ficar� na tela pelo tempo colocado na op��o INTERVAL, neste caso 3000 = 3 segundos....

Emerson Nascimento · Answer

seguindo o exemplo do nosso colega Bruno, eu tiraria a linha imediatamente anterior ao comando finally

Application.Initialize; 
frmSplash:=TfrmSplash.Create(Application); 
frmSplash.Show; 
frmSplash.Update;
try 
  Application.CreateForm(TfrmM_Principal, frmM_Principal); 
  Application.CreateForm(TfrmM_Cadastro, frmM_Cadastro); 
  Application.CreateForm(TDm, Dm); 
  Application.CreateForm(TfrmCadFornec, frmCadFornec); 
  Application.CreateForm(TfrmVenda, frmVenda); 
  Application.CreateForm(TfrmCadBanco, frmCadBanco); 
  Application.CreateForm(TfrmCadProduto, frmCadProduto); 
  Application.CreateForm(TfrmCadGrupo, frmCadGrupo); 
  Application.CreateForm(TfrmCadNf, frmCadNf); 
  Application.CreateForm(TfrmCadItens, frmCadItens); 
  Application.CreateForm(TfrmCadVendedor, frmCadVendedor); 
  Application.CreateForm(TfrmSplash, frmSplash); <-- essa linha � desnecess�ria
finally 
  Sleep(2000); // Insira esta linha 
  frmSplash.Close; 
end; 
Application.Run;

Vagner.oliveira · Answer

[quote:5aa3e9104b=�armando.boza�]eu sempre fa�o assim:1- Crio um form para ser o Splash2- Acrescento um Ttimer com as op��es ENABLED = false e INTERVAL = 30003- No evento onshow do splash coloco TIMER1.enabled := true;4- D� 2 cliques no timer1 e coloque CLOSE no evento.5- No form principal coloque assim no evento ONCREATE: FRMSplash.showmodal;Ele ficar� na tela pelo tempo colocado na op��o INTERVAL, neste caso 3000 = 3 segundos.[/quote:5aa3e9104b]gostaria de citar que no evento ONCREATE o comando correto �: FRMSplash.[b:5aa3e9104b][color=red:5aa3e9104b]hide[/b:5aa3e9104b][/color:5aa3e9104b]...

Armando.boza · Answer

[quote:4864ced9de=�vagner.oliveira�][quote:4864ced9de=�armando.boza�]eu sempre fa�o assim:1- Crio um form para ser o Splash2- Acrescento um Ttimer com as op��es ENABLED = false e INTERVAL = 30003- No evento onshow do splash coloco TIMER1.enabled := true;4- D� 2 cliques no timer1 e coloque CLOSE no evento.5- No form principal coloque assim no evento ONCREATE: FRMSplash.showmodal;Ele ficar� na tela pelo tempo colocado na op��o INTERVAL, neste caso 3000 = 3 segundos.[/quote:4864ced9de]gostaria de citar que no evento ONCREATE o comando correto �: FRMSplash.[b:4864ced9de][color=red:4864ced9de]hide[/b:4864ced9de][/color:4864ced9de][/quote:4864ced9de]Pq FRMSplash.[b:4864ced9de][color=red:4864ced9de]hide[/b:4864ced9de][/color:4864ced9de] ???Se eu vou mostrar o form de splash tem que ser showmodal mesmo ... se eu der um hide ele esconde .... vc deve estar enganado ou nao entendeu direito minha dica ......

F�rum Tela de splash #298511