pagina inicial

06/12/2003

1

:lol:
ola sou novo em programação em delphi como fazer tela de splash (tela de inicio de um aplicativo) fiz uma so que ela fica rapida de+ nao da nen para vela direito,tem como colocar um progressbar para marcar o tempo de abertura do programa??


Responder

Posts

07/12/2003

Franck.c

Na borda system, coloca um timer. na propriedade ´inteval´ coloca um tempo, pode ser 4000 , seria 4 segundos com a tela. Dê dois cliques en cima do timer e coloque o código:

timer1.enabled:=False;
hide;
application.createform(tFPrincipal,FPrincipal);
FPrincipal.show;

ou

timer1.enabled:=False;
hide;
FPrincipal.show;

ou

timer1.enabled:=False;
hide;
FPrincipal.showmodal;

Depois é só colocar ela como Form de inicio em project e options, na borda form em Main Form coloque o form do splash.

Qualquer coisa é só me comunicar!


Responder

07/12/2003

Bruno.oliveira

Esta solução é boa, mas outra solução é fazer com que o splash apareça enquanto os outros formulários do programa são criados na memória, como acontece com o delphi ou os aplicativos do office.
Para isto, suponha que seu form do splash se chame FormAbertura, entre no project source e apague a seguinte linha:

begin
Application.CreateForm(TFormabertura, FormAbertura);
{Esta linha deve ser apagada -^}
end;

Agora insira as linhas abaixo antes da criação dos demais form do seu aplicativo:

begin
FormAbertura:=TFormAbertura.Create(Application);
FormAbertura.show;
FormAbertura.repaint;
{Os outros form devem ser criados aqui}

{Depois de criados insira as seguintes linhas}
FormAbertura.Hide; {Esconde o FormAbertura}
FormAbertura.Free; {Libera Memória}
Application.Run;
End;


Responder