Hmm, ok, soweit klar. Kannst du mir bitte ein praktisches Beispiel geben, denn ich weiß iM. nicht, wie ich auf damit umgehen soll.
Edit: Moment, ich probier mal ein paar Sachen aus...
Edit2: Ahh, ok, alles klar. Also ist soetwas wie ein untypisierter Pointer, wo man selber typecasten muss..
Delphi-Quellcode:
type
PBlub = ^TBlub;
TBlub = record
A: DWord;
B: record end;
end;
var
X: PBlub;
Y: PByte;
begin
GetMem( Y, 256 );
try
FillChar( Y^, 256, #80 );
PDWord(Y)^ := 1990;
X := PBlub( Y );
showmessage( inttostr( X.A ) );
showmessage( inttostr( PByte( @X^.B )^ ) );
finally
FreeMem( Y, 256 );
end;
MfG