|
Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
Delphi 10.2 Tokyo Professional
|
Re: Überprüfen, ob ein Pointer auf ein Ojekt zeigt
3. Nov 2009, 14:24
Delphi-Quellcode:
function PointsToObj(P: Pointer): Boolean;
begin
try
Result := TObject(P).ClassName <> '';
except
Result := false;
end;
end;
Konnts mir nicht verkneifen 
Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
|