Kann ein Objekt seinen Namen ausgeben?

[himitsu]

Zitat von delfie:

Die zweite Idee, nämlich die Speicheradresse des Objekts auszugeben, kam dann daher, dass ich der Meinung war, dass die Objekt-Variable eigentlich ein Zeiger ist. Und der müsste dann ja auf eine Speicherstelle zeigen, an der die Daten des Objekts "beginnen".

Das ist auch fast so.
In der Variable versteckt sich ein Zeiger, welcher auf den "eigentlichen" Objektspeicher zeigt,
welchen man sich wie einen Record vorstellen kann, wo ein Zeiger auf seinen Typ und auf die eigenen Variablen Felder enthalten sind.

Nur daß man hier den Zeiger nicht manuell dereferenzieren muß, weil das automatisch geschieht.


Man kann das mit den Arrays vergleichen.
- statische Arrays sind wie Records
- und dynamische Arrays wie Zeiger auf Records (also wie Objekte)

[delfie]

Und mit dem Code von Jänicke könnte ich dann zeigen, dass alle Variablen, die sich auf das selbe Objekt beziehen, die gleiche Speicheradresse angeben?

[jaenicke]

Zitat von delfie:

Und mit dem Code von Jänicke könnte ich dann zeigen, dass alle Variablen, die sich auf das selbe Objekt beziehen, die gleiche Speicheradresse angeben?

Richtig.

[himitsu]

Format('%p = %p', [Pointer(VarA), Pointer(VarB)]) oder inkl. der Delphi-Signatur "$" Format('$%p = $%p', [Pointer(VarA), Pointer(VarB)])

SysUtils.Format


Zur Konvertierung in einen "Integer", sollte man vielleicht besser z.B. IntPtr für's Casten verwenden.
z.B. bei Win64 würde eingefrorene/kaputtgemachte Integer ja einen Fehler bringen und die Hälfte abschneiden, aber hoffentlich merkt der Compiler den Fehler und stoppt mit einem Compilerfehler, weil die Größe nicht passt.

[Uwe Raabe]

Zitat von himitsu:

eingefrorene/kaputtgemachte Integer

Versteh mich nicht falsch, aber deine durchaus qualifizierten Aussagen würden ohne diese subtil eingestreuten Rants gerade für Anfänger wesentlich besser zu verstehen sein.

[himitsu]

Ups.

Grund: Früher war der Integer mal ein "dynamischer" Type, welcher mit dem System mitgewachsen ist.
In Windows 3.1 (16 Bit) war er 16 Bit groß, also 2 Byte.
In den 32-Bit-Windows-Versionen ist er 32 Bit groß, also 4 Byte.
Und theoretisch hätte er dann im 64-Bit-Bindows dann 64 Bit sien müssen, aber die große Firmen (wie Intel) entschieden sich den Einzufrieren und erfanden dafür einen neuen Typen, welcher nun mitwächst, was im Delphi jetzt der NativeInt ist.

Allerdings wurden auch Typen erfunden, welche in ihrer Größe direkt an die Pointer gebunden ist, wie z.B. der IntPtr (Pointer zu Interger).

[jaenicke]

Zitat von himitsu:

Und theoretisch hätte er dann im 64-Bit-Bindows dann 64 Bit sien müssen, aber die große Firmen (wie Intel) entschieden sich den Einzufrieren und erfanden dafür einen neuen Typen, welcher nun mitwächst, was im Delphi jetzt der NativeInt ist.

Der wird dann vermutlich irgendwann beim Übergang zu 128 Bit eingefroren und dann gibt es RealNativeInt usw.