Splash

Question

Ol� amigos, blz? Tenho uma d�vida em rela��o � tela de splash. Qdo ela � executada, teoricamente deveria fechar no momento em que a tela principal do sistema abre. Pois bem, qdo eu minimizo a tela pri...

Tnaires · Answer

Ol�Tente substituir o[code:1:b9ae6f7695]FreeAndNil(frmSplash);[/code:1:b9ae6f7695]por[code:1:b9ae6f7695]frmSplash.Release;[/code:1:b9ae6f7695]Abra�os...

Roger1976 · Answer

Tarso, eu fiz o teste, por�m n�o deu certo. Tem um procedimento que ao abrir a tela de MOVIMENTA��O, automaticamente minimiza a tela principal. Nesse intervalo, a tela de splash aparece e em seguida desaparece. Acho que deverei fazer isso de outra forma, caso tenha uma sugest�o, testarei.

Obrigado pela aten��o.

Aspirante · Answer

Olha, a minha tela de Splash n�o fica n�o cara. S� que meu c�digo � bem diferentinho. Tente esse c�digo. Espero que possa ajudar:

Primero pegue o formul�rio que � o Splash e no menu Project - Options mude ele pra Available forms. A�, no ViewSource escreva:

{$R *.res}

begin
  SplashForm := TSplashForm.Create(Application);
  SplashForm.Show;
  SplashForm.BorderStyle:=bsnone;
  SplashForm.Update;
  Application.Title := �Programa�;
  Application.Initialize;

T�, ainda no View Source, vai ter os c�digos que inicializam os formul�rios n�. Depois deles no final coloque:

SplashForm.Hide; SplashForm.Free; Application.Run;

Espero que possa ter ajudado.

Flw.

Roger1976 · Answer

Kra, testei o seu c�digo, o problema � que mesmo assim, se vc arrastar a tela o splash vai estar l�. Na tela principal, tem um menu chamado MOVIMENTA��ES, e uma op��o chamada ENTRADA/SA�DA, que � onde acesso a tela de movimenta��o de componentes de inform�tica.

D� uma olhada no c�digo abaixo que eu utilizei:

try
frmPrincipal.WindowState := wsMinimized;
frmMovimentacao := TfrmMovimentacao.Create(self);
frmMovimentacao.ShowModal;
finally
FreeAndNil(frmMovimentacao);
end;

No intervalo de uma tela para outra, o splash aparece, veja que n�o a a��o de minimizar a tela principal e exibir a tela de movimenta��o � feita pelo sistema, e n�o pelo usu�rio. Talvez Tarso tenha alguma coisa errada no c�digo acima. Um detalhe, estou usando o Delphi 2005, eu n�o sei se isso tem alguma coisa a ver.

Kra, valeu pela for�a, se puder fa�a um teste neste c�digo, caso veja algo de errado, � s� me avisar.

Um abra�o,

Aspirante · Answer

Cara n�o to entendendo n�o. Porque no meu funciona sim a tela de Splash. Mesmo movimentando a tela principal, a tela de Splash n�o est� l�. Tem certeza de que voc� fez os procedimentos certos? Bom, o SplashForm tem que estar no Available forms e ap�s a chamada dos formul�rios, SplashForm.Hide, SplashForm.Free.

Sinceramente, acho que voc� est� com algum problema em fazer o c�digo, porque n�o vejo erro, ele oculta e libera o Splash.

Uhmm. N�o sei se � o 2005 que d� problema n�o, mas eu uso o 6.

Mas se continuar dando problema cara, tenta fazer:

SplashForm.Width := 1
SplashForm.Height := 1
SplashForm.Left := 10000

Hehehe. � meio sem no��o mas pode at� servir.

Testa a�.

Flw.

Tnaires · Answer

Ol�Essa � a maneira que eu codifico o Splash:[code:1:fe45f2e37a]  Application.Initialize;  FrmSplash := TFrmSplash.Create(Application);  with FrmSplash do  begin    Show;    Update;  end;  // O Form principal eu crio depois do Splash:  Application.CreateForm(TFrmPrincipal, FrmPrincipal);  Application.CreateForm(TDtmPrincipal, DtmPrincipal);  // No meu caso, h� um formul�rio de login que eu crio agora:  Application.CreateForm(TFrmSenhaUsuario, FrmSenhaUsuario);  FrmSenhaUsuario.ShowModal;  // Agora eu destruo o Splash:  FrmSplash.Release;  Application.Run;[/code:1:fe45f2e37a]Compare com o seu c�digo e cite as diferen�as para n�s.Abra�os...

Roger1976 · Answer

Amigos, eu refiz o c�digo e agora funcionou. Sinceramente, eu n�o sei onde estava o erro, mas o que importa � que funcionou... Eu ainda estou iniciando, e estou apanhando muito, mas estou aprendendo muito tb�m.

Valeu mesmo pela ajuda de vcs...

Abra�os,