Vitor Luiz Redes wrote:
> Você pode fazer a verificação de duas maneiras :
>
> if Form = Nil
>
> If Assigned(Form)
>
> Particularmente, acho que a segunda opção é melhor, ela não deixa brechas ....
> Como por exemplo, o Form pode ser diferente de nil, e mesmo assim não estar
> criado ...
>
>
Errado.
Exemplo retirado do help do delphi
var P: Pointer;
begin
P := nil;
if Assigned (P) then Writeln ('You won''t see this');
GetMem(P, 1024); {P valid}
FreeMem(P, 1024); {P no longer valid and still not nil}
if Assigned (P) then Writeln ('You''ll see this');
end;
Resumindo: se vc der free, o assigned continua retornando true.
A única forma garantida de verificar se o form está criado é procurando
ele em screen.forms.
--
Marcelo Almeida
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
