Código Delphi
[-]
if assigned(Form1) Then
ShowMessage('Si está creada')
else
ShowMessage('No está creada!');
Para que esto funcione, es imperativo que la variable Form1, sea global, y si destruyes el formulario en algún punto del programa, verifiques que está linea se encuentre:
Form1 := nil;
justo después de la destrucción del mismo.
Otra opción seria recorrer el vector Forms del objeto global screen.
Hasta luego.
pd. Por curiosidad me he dado una vuelta por tus mensajes, y veo que todos son "urgentes". Lo que es urgente (y que me asombra que nadie te haya recomendado antes) es que leas la
guia de estilo de los foros, donde esta práctica está desaconsejada, por lo que es
urgente que la dejes.