Fórum Como executar uma procedure de um form em outro form ? #260356

29/11/2004

0

Estou com o seguinte problema, tenho o MDIForm e entre meus
FormChilds, tenho o form TESTE onde eu quero executar uma procedure
então dou create e passo os paramentros e chamo a procedure roda legal o problema
é que o formTESTE esta aparecendo na tela e eu gostaria que ficasse invisivel.
segue o código abaixo.


Application.CreateForm(TfTESTE, fTESTE); \\chamo o formulario
fTESTE.txtNDisc.Text := testet.sndisc; \\ Passo os parametros
fTESTE.dtData.Text := DateToStr(Date);
fTESTE.TxtHora.Text := inttostr(ipicook) + ´:00´;
fTESTE.TxtDuracao.Text := SegParaMinutoS4(imediadur);
fTESTE.Button1Click(Sender); \\ chamo a procedure que me interessa.

Já tentei setar nos eventos oncreate e onactive do formTESTE
a propriedade visible para false aí da o seguinte erro :

´Cannot hide an MDI ChildForm´

Agradeço a quem poder me ajudar.


Semchance

Semchance

Responder

Posts

29/11/2004

Cabelo

Colega..

O seu problema está na hora da exibição e criação do form..

Ele deve estar dentro do auto creste forms do delphi, e por isso quando vc chama o evento oncreate, ele exibe o form na tela.. o que vc deve fazer é retirar o form do auto create em :

Project -> Options -> Forms

Nesta guia vc irá visualizar os forms que deverão ser AUTO Criados, isto é que são criados automaticamente pelo delphi, e os forma que devem ser criados por vc, selecione o form fteste e clique na seta indicativa para a direita..

Quando vc fizer isso ele sai do auto create, rode seu programa e veja como dá certo agora, só há um problema ao fazer isso, todas as vezes que vc usar o método Show para este form, vc deve criar primeiro ele, e ´matar ele´ quando sair, para isso vc pode fazer assim :

applicationa.createform(Tfteste, fteste);
fteste.Show;
fteste.release;

espero te ajudado.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar