Pointer Dereferenzierung Casting elegant?

[Looper]

Moin,

Mein Testcode zur Frage:

Delphi-Quellcode:

type
  tbruch = record
    z,n : integer;
  end;
var
  a : Tbruch;
  p : Pointer;
begin
  a.z := 1;
  a.n := 3;
  p := @a;
  ShowMessage(IntToStr(TBruch(p^).n));
end;

Ist es möglich zu prüfen worauf der Pointer zeigt?
Stelle mir das ungefähr so vor:

Delphi-Quellcode:

if (p^) is TBruch then
...

mfg Looper

[Aphton]

Sofern ich weiß, nicht bei Rekords, jedoch bei Klassen!

[p80286]

Jain!
Der (untypisierte) Pointer zeigt auf irgendwelche Daten.
Es ist Dein Job, diese Daten zu interpretieren.
In den meisten Fällen erwartet mannatürlich bestimmte Werte. Wenn die an der Adresse nicht vorhanden sind, dann stimmt da wahrscheinlich etwas nicht.

Gruß
K-H

[Looper]

Okay. Dann ist die Frage geklärt.
Danke für die schnelle Antwort