Código
form1 := Tform1.create(); //A variável form1 passa a ter um valor diferente de nil. Logo, faça o teste:
If form1 = nil then
{form não criado ainda ou já foi fechado}
//Lembre-se de fazer o form1, no seu evento close, receber nil.
form1 := nil;
//Assim ele estará fechado e não existirá mais. Teste este exemplo e verá.
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009