Fórum SplashScreen #357299
17/04/2008
0
Boa noite,
Tenho um form de splash, que roda normalmente, depois ele chama o formulário de login, ai, quando digito login e senha, o form principal não abre e o programa fecha.
no create do form principal, eu chamo o form de login.
Só dá esse problema quando uso a tela de splash, senão, roda normalmente.
o que pode ser?
Tenho um form de splash, que roda normalmente, depois ele chama o formulário de login, ai, quando digito login e senha, o form principal não abre e o programa fecha.
no create do form principal, eu chamo o form de login.
Só dá esse problema quando uso a tela de splash, senão, roda normalmente.
o que pode ser?
Mcamilo.o
Curtir tópico
+ 0
Responder
Posts
19/04/2008
Darkrme
amigo... qual o formulario principal do seu sistema?
se nao for o form q tem os menus de acesso aos controles.. coloque-o como form principal... ai no evento on show dele.. vc coloca assim
frmsplash.showmodal;
//--
frmlogin.showmodal;
e no formulario splash.. vc coloca um timer...
no evento do timer vc coloca
var i : integer;
begin
i := i + 1;
if i = 10 then
begin
Close;
end;
ou seja.. o valor 10 eh qnts segundos seu form de splash vai ficar aberto... ai apos fechar o splash ele abre a tela de login... e na verificacao de usuario faz as validacoes e no final se usuario e senha estiver corretos vc fecha o form de login...
pronto.. ai seu form principal vai aparever =)
se nao for o form q tem os menus de acesso aos controles.. coloque-o como form principal... ai no evento on show dele.. vc coloca assim
frmsplash.showmodal;
//--
frmlogin.showmodal;
e no formulario splash.. vc coloca um timer...
no evento do timer vc coloca
var i : integer;
begin
i := i + 1;
if i = 10 then
begin
Close;
end;
ou seja.. o valor 10 eh qnts segundos seu form de splash vai ficar aberto... ai apos fechar o splash ele abre a tela de login... e na verificacao de usuario faz as validacoes e no final se usuario e senha estiver corretos vc fecha o form de login...
pronto.. ai seu form principal vai aparever =)
Responder
Gostei + 0
19/04/2008
Darkrme
amigo... eu achei um erro ali ^^
na hora q o form splah abrir... a variaval i tem q ser global... ai no evento onshow do form.. vc faz
i := 0;
ai vai dar certo =P
na hora q o form splah abrir... a variaval i tem q ser global... ai no evento onshow do form.. vc faz
i := 0;
ai vai dar certo =P
Responder
Gostei + 0
19/04/2008
Paullsoftware
Boa tarde amigo, creio que a melhor maneira de se criar uma janela do tipo Splash Screen é você fazêlo no no dpr da aplicação sem que haja necessidade de timer e etc...
fiz um exemplo com dois forms onde fiz do form meu Splash e o Form um o Form Principal, segue o código DPR da aplicação:
espero ter ajudado! :wink:
fiz um exemplo com dois forms onde fiz do form meu Splash e o Form um o Form Principal, segue o código DPR da aplicação:
program Splash;
uses
Forms,
UPrincipal in ´UPrincipal.pas´ ,
uSplash in ´uSplash.pas´ ;
{$R *.res}
begin
Form2 := TForm2.Create(Application); //Cria o form2 (Splash) antes da aplicação
Form2.Show;// Mostra o Form
Application.Initialize;
Form2.Update;//Atualiza os dados do Form
Application.CreateForm(TForm1, Form1);
repeat Application.ProcessMessages; //Processa a aplicação, até criar todas as tarefas
until Form2.CloseQuery; //Quando terminar fecha o form2 (Splash)
Form2.Hide; //Esconde ele
Form2.Free; //depois destruo da memória
Application.Run;
end.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)