Form soll sich selbst zerstören

[dataspider]

Und ob das Form da ist:

Delphi-Quellcode:

function FormExists(AFormClass: TFormClass): Boolean;
Var
  I: Integer;
begin
  Result := False;
  for I := 0 to Screen.FormCount - 1 do
    if (Screen.Forms[I].ClassType = AFormClass) then
    begin
      Result := True;
      Exit;
    end;
end;
// Aufruf:
if FormExists(TForm2) then
...

Ist IMO sicherer als über eine Variable...