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.