Buscar por:

Melhor forma de criar um splash para seu programa

Código

{Caros Colegas ; 

Vou ensinar a melhor forma de como se desenvolver uma splash para seu programa , não podemos nos esquecer...

que uma splash é muito importante para um software , pois além de ceder informações sobre copyright do autor , dá uma aparência profissional ao mesmo .

Bom , mãos na massa !

1º ) Crie um novo projeto no Delphi ;

2º ) O Fom 1 que se abriu , será o formulário principal; 

3º ) Coloque nele um Panel , um TTimer;

4º ) O Panel , será no Splash , então nele coloque o essencial que não pode faltar , uma Gauge ou se preferir uma Progress Bar .

5º ) Enfeite como quiser o seu Panel , ou seja , sua splash ; ( Obs.: Vale lembrar que é essêncial um bom disign nesta parte do projeto pois uma splash é o rosto do programa que está desenvovendo !

6º ) No evento OnActive do form , coloque :

--------------------------------------------------------------}

begin

Form1.enabled:=False;

Timer1.enabled:=True;

end;

{--------------------------------------------------------------

7º ) Agora na propriedade Timer do nosso TTimer mude de 1000 para 100 ;

8º ) No Evento OnTimer do nosso TTimer coloque :

--------------------------------------------------------------}

begin

Panel1.Visible:=True;

Gauge1.Progress=Gauge1.Progress+1;

if Gauge1.Progress=100 then

begin

Form1.Enabled:=True;

Timer1.Enabled:=False;

end;

end.

{--------------------------------------------------------------

Espero que este primeiro artigo que escrevo para um site deste caráter tenha ajudados meus colegas programadores . Até mais ver no próximo artigo ! 

Qualquer erro no código podem me contactar pois digitei este código na raça , tirei ele dá memória , mais creio estar certo !

Tchau .

Tiago José Milam

E-mail : tiagojmilam@bol.com.br}