Qual a melhor maneira de trabalhar com os FROMS??

Question

Pessoal... estou com uma d�vidaN�o sei qual a melhor maneira de se trabalhar com FORMS.N�o sei se devo criar todos eles no inicio do sistema ou e crio cada um conforme for utiliz�-los.Eu sempre usei a...

Armando.boza · Answer

Desculpe pelo T�tulo... � FORMS...

Tnaires · Answer

Ol�Eu costumo criar os forms s� na hora q for us�-los, e liber�-los da mem�ria quando n�o precisar mais deles (leia-se: quando o usu�rio fechar a janela).Segue o c�digo:[code:1:a878988b41]if VariavelQueReferenciaOForm = nil then  Application.CreateForm(Form, VariavelQueReferenciaOForm);VariavelQueReferenciaOForm.Show;[/code:1:a878988b41]E no OnClose do Form:[code:1:a878988b41]Action := caFree;VariavelQueReferenciaOForm := nil[/code:1:a878988b41]Abra�os...

Beppe · Answer

Eu escrevi um artigo sobre o assunto...o endere�o est� no rodap�, este que est� em negrito.

[url=http://www.beppe.theblog.com.br/inicial.html]Uncanny Dude�s Home[/url] [url=http://www.forumweb.com.br/artigos/artigos.php]Meus artigos:[/url] Aleatorizando [b:b5d430a10c]Otimizando a inicializa��o do sistema[/b:b5d430a10c]

Zunker · Answer

para abrir eu uso assim:[quote:5e62e009a5]if FORM = nil then        FORM := TFORM.Create(self)     else     begin          FORM.WindowState := wsnormal;          FORM.show;     end;[/quote:5e62e009a5]e para fechar como foi citado pelo �tnaires�...

Fred · Answer

Depois de muito buscar a melhor maneira de fazer isso, cheguei a esta conclus�o e nunca tive problemas!!!

form1 := Tform1.create(self)//ou application
try
form1.showmodal;
finally
form1.Release;
form1 := nil;
end;
8)

Fred · Answer

soh esqueci de dizer uma coisa: todos os forms devem estar como available forms, no project options!! menos o form menu, e o datamodule se for preciso!!...

Tnaires · Answer

[quote:69deb60be9=�Fred�]Depois de muito buscar a melhor maneira de fazer isso, cheguei a esta conclus�o e nunca tive problemas!!! form1 := Tform1.create(self)//ou application try   form1.showmodal; finally   form1.Release;   form1 := nil; end; 8)[/quote:69deb60be9]Quero s� fazer uma considera��o: se seu sistema estiver usando forms MDI, e se o form q vc quer criar j� tiver sido instanciado, ele vai tentar criar outro em cima da vari�vel q j� aponta pro objeto criado anteriormente. Da� a import�ncia do �if form = nil then� antes do construtor....

Armando.boza · Answer

Legal pessoal.... muito obrigado pelas respostas...

No caso deste exemplo de nosso amigo... o que significa o finally e o release???

form1 := Tform1.create(self)//ou application 
try 
form1.showmodal; 
finally 
form1.Release; 
form1 := nil; 
end;

Tnaires · Answer

O bloco try/finally envolve a execu��o de instru��es q podem resultar em algum erro. As instru��es q tiverem dentro do bloco finally ser�o executadas, independente de ter havido erro nas instru��es contidas no bloco try. Nesse caso, o finally garante q o form vai ser liberado da mem�ria (Release), independente d qq condi��o d t�rmino da fun��o ShowModal.

Legal...

Dessa eu n�o sabia..

Vou fazer os testes e dou retorno assim que puder

Muito obrigado

Armando.boza · Answer

[quote:a56771be95=�tnaires�]O bloco try/finally envolve a execu��o de instru��es q podem resultar em algum erro. As instru��es q tiverem dentro do bloco finally ser�o executadas, independente de ter havido erro nas instru��es contidas no bloco try. Nesse caso, o finally garante q o form vai ser liberado da mem�ria (Release), independente d qq condi��o d t�rmino da fun��o ShowModal.[/quote:a56771be95]Legal...Dessa eu n�o sabia..Vou fazer os testes e dou retorno assim que puderMuito obrigado...

Fred · Answer

Desta mameira nao precisa de if nao senhor!!! porque toda que o formulario eh criado, ele tambem ja eh destruido e liberado da memoria logo apos ser fechado!!! com showmodal eh claro!!!...

Paulo_amorim · Answer

Ol�Fa�o as chamadas comForm1 := TForm1.Create(self);try Form1.ShowModal;finallyForm1.Free;end;Como dito, n�o � necess�rio if pois ele atribui nil ao liberar o formAt�+...

Armando.boza · Answer

[quote:ff8e95d683=�Paulo_Amorim�]Ol�Fa�o as chamadas comForm1 := TForm1.Create(self);try Form1.ShowModal;finallyForm1.Free;end;Como dito, n�o � necess�rio if pois ele atribui nil ao liberar o formAt�+[/quote:ff8e95d683]Alguem pode me explicar a diferen�a de usar esse .free e o .release com nil?????...

Marcio.theis · Answer

De uma olhada nesta dica...//www.linhadecodigo.com.br/dicas.asp?id_dica=1042&sub=14...

Isabelct · Answer

[quote:1e763eeb79=�Paulo_Amorim�]Form1 := TForm1.Create(self);try Form1.ShowModal;finallyForm1.Free;end;Como dito, n�o � necess�rio if pois ele atribui nil ao liberar o form[/quote:1e763eeb79]Uma chamada a �Objeto.Free� simplesmente n�o garante a atribui��o de nil � vari�vel. Caso queira-se garantir que a vari�vel, ap�s destru�da, conter� nil, deve-se fazer a atribui��o expl�citamente.[code:1:1e763eeb79]Form1 := TForm1.Create(self);try   Form1.ShowModal;finally  Form1.Free;  Form1 := nil;end;[/code:1:1e763eeb79]...

F�rum Qual a melhor maneira de trabalhar com os FROMS?? #269930