Uma Ajuda Por Favor

[Guest - mario -]

eu fiz uma form de apresentação do meu programa , "meio que um seja bem vindo".

Ai e gostaria que ela chamasse a form do meu programa propriamente dito depois de uns 5 segundos, e logo depois do programa aberto gostaria de fechar essa form de aprensentação. isso é possível alguém poderia me ajudar ?

[lazarodm]

Você pode colocá-la como um SplashScreen:

I) em 'Project>Options' coloque o form da apresentação na coluna 'Avaliable forms';

II) no código do projeto ('Project>View Source') coloque o seguinte código:

(...)

begin

frm_abertura := frm_abertura.Create(Application);

frm_abertura.Show;

frm_abertura.Update;

Application.Initialize;

{AQUI VEM A CRIAÇÃO DOS OUTROS FORMS}

frm_abertura.Hide;

frm_abertura.Free;

Application.Run;

(...)

Espero ter ajudado!

[Guest - mario -]

amigo, obrigado pela ajuda, porém sua dica não está dando certo!, como posso fazer pra abrir a form de abertura, depois abrir e programa , depois de aberto o programa gostaria que a form de abertura fosse fechada, alguém pode me ajudar ?

[Cidão]

Bom Mario eu uso assim:

Insira outro Form em sua aplicação, mudes as prorpiedades name=splash; FormStyle para fsStayOnTop e a propriedade(BorderStyle) do form para bsNone;

Agora va em View Unit e abra a unit do seu projeto e insira o seguinte código:

Application.Initialize; // aqui é padrão , sempre essa tem que ser a principal.......

Splash:= tsplash.create(application);

Splash.show; // mostra o form na tela...

Application.ShowMainForm:= TRUE; //retira o splash de exibiçao e cria os outros forms na memoria e bota a aplicação para rodar

{daqui para baixo deve aparecer os demais formularios como mostra abaixo}

Application.CreateForm(TForm1, Form1);

Application.Run;

end.

Depois coloque um Timer no form splash e coloque o seguinte código:

Form1.show;

splash.close; //AQUI FECHA O FORM DE ABERTURA - SPLASH

splash.free; //aqui que segura na memoria..

Na propriedade Interval coloque o tempo que você quer que o form fique aparecendo(lembrando que o tempo é em milisegundos);

Bom é isso

Espero ter te ajudado!

T+

[Guest - mario -]

bom, obrigado vlw ai pela dica...Mas a minha idéia era um pouco diferente na qual está funcionado, eu queria que só aparecesse a Aplicação depois do Splesh fechado, aqui acontece que ass duas abrem juntas... eu só queria que abrisse depois... mas é isso muito obrigado pela dica ! falou !!

[bolomaster]

olha só amigo, você procurou na seçao de dicas ?

lá tem um exemplo bem simples e muito bom de splash que é o você esta querendo clica no link e procurar pelo post do companheiro delphi man32 tenho certeza que você vai gostar

Abraços Rafael Marciano

Seçao de Dicas