Einzelnen Beitrag anzeigen

Golze

Registriert seit: 26. Aug 2004
Ort: Berlin
32 Beiträge
 
Delphi 5 Enterprise
 
#1

Objekt prüfen, ob es noch existiert oder zerstört ist.

  Alt 31. Aug 2004, 18:39
Hi Schlaumis,
habe das Problem, eine Form nach einem Release zu prüfen, ob sie noch existiert oder nicht. Das gleiche gilt auch für ein Free. Wer kann mir ein Tip geben, wie ich ein beliebiges Objekt prüfen kann, ob es noch wirklich existiert, wenn die Referenzvariable nicht explizit auf NIL gesetzt worden ist.
Delphi-Quellcode:
Var
  form1: TFrom;
begin
  form1 := TForm.Create(Application);
  ....
  form1.Release;
end;

procedure CreateLostForm;
begin
  if form1 = nil then //[b]das funktioniert nicht!!!!![/b]
    form1 := TForm.Create(Application);
end;
kay
Kay Golze
  Mit Zitat antworten Zitat