viadas: Terça-feira, 11 de Novembro de 2008 9:49:10
Assunto: Re: [delphi-br] Assigned nao funciona
Faça assim:
fForm1 := TfForm1.Create( Self);
try
fForm1.ShowModal;
finally
fForm1.Release;
fForm1 := nil;
end;
Obs: não coloque o comando "fForm1 := nil" no evento "onClose" do
fo
Também estou com o mesmo problema, já tentei todas as dicas dos amigos
acima, e tive o mesmo problema, pois tenho um form de consulta e um botão
novo que abre o formulario de cadastro, mas não consigo abrir esse
formulario de cadastro e fechar esse da consulta.
[As partes desta mensagem que não c
Faça assim:
fForm1 := TfForm1.Create(Self);
try
fForm1.ShowModal;
finally
fForm1.Release;
fForm1 := nil;
end;
Obs: não coloque o comando "fForm1 := nil" no evento "onClose" do
formulário modal.
Alexandre Rodrigues escreveu:
> Caro Leandro não vejo sen
Caro Leandro não vejo sentido no uso de assigned nesse caso já que o
form é exibido no modo modal, eu faria assim:
fForm1 := TfForm1.Create(nil);
try
fForm1.ShowModal;
finally
FreeAndNil(fForm1);
end;
FreeAndNil, se não me engano, só a partir do delphi 7, senão tem que ser
o velho fForm1.
Pessoal,
Tenho o seguinte código, dentro de um menu no form principal do meu projeto:
if not Assigned(fForm1) then
fForm1 := TfForm1.Create(Application);
fForm1.ShowModal;
e no OnClose do Form1, eu tenho:
Action := caFree;
Form1 := nil;
Se eu clicar no menu uma vez após a outra, d
5 matches
Mail list logo
