Wainer, ao inves de usar o Assigned eu testo se a variável que recebe o form
é nil, no seu caso ficaria assim:
if Form = nil then
application.createform(TForm, Form);
E no evento onClose do Form eu utilizo:
action :=caFree;
form:=nil;
[]
Andrei
2009/4/5 Wainer <wai...@megasinal.com.br>
> Amigos , estou com um pequeno problema nas chamadas de forms Mdi, que é o
> seguinte:
>
> para nao escrever
> if not Assigned( Form ) then
> application.createform(TForm, Form);
> Form.show;
>
> em todas as opcoes do menu fiz uma funcao ( que esta dentro de uma unit so
> de funcoes)
>
> ShowForm( TF_combustivel_preco, F_combustivel_preco );
>
> e dentro desta funcao escrevi o primeiro codigo, muito bem, isto tudo é
> para nao abrir duas instacias do mesmo form, porem,
> nao da certo, é que o assigned sempre vem false, debugando o Form vem
> sempre nil, ai sempre cria varias instacias, o que tem errado?
>
> obrigado
> Wainer
> 16-9999-6697
> 16-9101-1757
>
> Wisa soft
> 16-3721-7187
>
> o[|||]o
> ��-o---��
> CJ3A - 49
>
>
[As partes desta mensagem que n�o continham texto foram removidas]
