Überprüfen ob ein Objekt existiert aber wie?

[derMischka]

Hier noch ein weiter Ansatz:

Delphi-Quellcode:

function ObjectExists(aObj: TObject): boolean;
begin
  Result := False;
  if aObj = nil then exit;
  try
    Result := aObj.InheritsFrom(TObject);
  except
  end;
end;

derMischka