Duvida programaçao Delphi (programa pizzaria)

[backb0ne]

Boa Tarde!

Sou novo aqui no forum e gostava de saber se me podiam ajudar num programa para a escola que tenhu de desenvolver.

Já fiz a maior parte do programa, agora so falta mesmu melhorar a nivel de estrutura.

O meu cordenador disse que precisava de colocar mais do que um FORM no programa mas está complicado, tambem precisava de colocar um FORM para a apresentaçao da suposta pizzaria que aparecia no inicio do programa e depois desaparecia, precisava tambem de outro FORM para fazer a minha apresentaçao e identificaçao do trabalho.

Gostaria que me ajudassem ou mesmu fizessem vcs os melhoramentos, ficaria agradecido

Deixo aki o programa se alguem tiver com vontade de ajudar.

Download do meu programa

Desde já agradeço a vossa colaboração

Cumprimentos

[M6]

backb0ne, antes de mais, é "mesmo" e "tenho", e não "mesmu" e "tenhu".

Quanto a fazermos nós os melhoramentos, digamos que "estás com muito azar" nesse ponto...

Se tiveres dúvidas, colocas aqui e sê específico, se fores vago como o foste neste post, ninguém te vai conseguir ajudar porque ninguém sabe se o primeiro Form é mesmo uma janela ou apenas um splash screen e se o Form de identificação é um help->about ou qualquer outra coisa...

[nilmar]

Olá, já trabalho com delphi ha 10 anos, desde a versao 3, com relação à tela que pretende no inicio do programa, é uma tela splash, tem que ser inicializada e apos, aproveito para criar as base de dados(scripts) e índices, logo apos criada tabelas ou indices ela é liberada da memória. qqr duvida:

vá à aba project, view source;

onde verá SPLASH é toda a tela de apresentação que foi criada anteriormente e NORMALMENTE!

{$R *.RES}

begin

  Application.Title := 'Sistrab.exe';

  FSplash := TFSplash.create(Application);

  FSplash.Show;

  FSplash.Update;

uso para criar os forms

  Application.CreateForm(TFUsu, FUsu);

  Application.CreateForm(TFSplash, FSplash);

  Application.CreateForm(TFcadpgto, Fcadpgto);

  Application.CreateForm(TFEmp, FEmp);

  Application.CreateForm(TFmapa, Fmapa);

  Application.CreateForm(TFCadFerias, FCadFerias);

  Application.CreateForm(TFRelFerias, FRelFerias);

  Application.CreateForm(TFCadCargo, FCadCargo);

  Application.CreateForm(TFInterv, FInterv);

  Application.CreateForm(TAutocad, Autocad);

  Application.CreateForm(TFrelmapa, Frelmapa);

  Application.CreateForm(TFDias, FDias);

  Application.CreateForm(TFCadObra, FCadObra);

  Application.CreateForm(TFDigit, FDigit);

  Application.CreateForm(TFtools, Ftools);

  Application.CreateForm(TFeqpfun, Feqpfun);

  Application.CreateForm(TFRequisita, FRequisita);

  Application.CreateForm(TFimagem, Fimagem);

depois de criados...

  FSplash.Hide;

  FSplash.free;

  Application.Run;

end.

Espero ter dado uma luz.