Klasse Instantiiert??

[Nalincah]

wie kann ich abtesten ob ne klasse nicht instantiiert ist?

Delphi-Quellcode:

var myclassVar: TMyClass
begin
  if myClassVar = nil then

... das funzt net

[sakura]

Also ich mache das eigentlich immer so Du musst nur beim zerstören der Instanz sicherstellen, das myClassVar wieder nil ist

FreeAndNil(myClassVar); ......

[negaH]

Das ist übrigens die einzigst sichere Methode.

Gruß Hagen

[Jens Schumann]

Hallo,
ich denke der General hat zu wenig Source geliefert.

Delphi-Quellcode:

 procedure Form1.xxx;
 var
   MyClass : TMyClass;
 begin
   If MyClass<>Nil then
     ...
 end;

geht nicht, da MyClass eine lokale Instanz ist.

hingegen

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
    FMyClass : TMyClass;
  public
    { Public-Deklarationen }
  end;

 procedure Form1.xxx;
 begin
   If FMyClass<>Nil then
     ...
 end;

funktioniert, da das Form beim Create alle Felder auf 0 setzt.

[Nalincah]

Ich will, bevor ich die Klasse zerstöre, erstmal überprüfen ob sie instantiiert wurde

[sakura]

Das ist ja auch korrekt - aber dann kannst Du einfach den Aufruf über FreeAndNil nutyen, der erledigt u.a. genau das

......