Zitat von
himitsu:
was logisch gesehn in etwa Diesem entsprechen würde
Delphi-Quellcode:
procedure FreeAndNil(Obj: TObject); <<<<<< fehlt hier ein VAR
begin
try
Obj.Free;
finally
Obj := nil;
end;
end;
das VAR bei dieser Parameterübergabe ist aber eintscheidend. Sonst wird das if Assigned(obj) wieder nix
