Steckt man das obige Beispiel so in eine Klasse sollte es ja keine Probleme geben.
Joar.
Ach ja, ich hatte meinen letzten Beitrag in der Zwischenzeit nochmal bearbeitet ... war wohl nur etwas langsam dabei.
Und zum Array:
Delphi-Quellcode:
type
// diese Array-Typen gibt es manchmal auch vordefiniert (z.B. PByte für Array[] of Byte)
// manche Pointer-Typen besitzen auch schon eine integrierte Pointer-Arithmetik, wo man sich das Array sparen kann (z.B. PAnsiChar)
TIntegerArray: array[0..0] of Integer;
PIntegerArray: ^TIntegerArray;
var
MyArr: PIntegerArray;
MyArr := Pointer($12345678);
for i := 0 to 10 of
ShowMessage(IntToStr( MyArr[i] ));
Das entspricht quasi einem
Delphi-Quellcode:
var
MyPnt: NativeUInt;
MyPnt := $12345678;
for i := 0 to 10 of
ShowMessage(IntToStr( PInteger(MyPnt + i * SizeOf(Integer))^ )); // wobei den Offset Delphi auch automatisch berechnen kann => siehe oben