Meinst Du :
Delphi-Quellcode:
Type _SIGN = Record
h : String[32];
typ : Byte ;
comp : Boolean;
End;
p_sign = ^_sign;
Var
Po : p_sign;
Sign : _SIGN;
buf : Array [0.511] of Byte;
Begin
sign.h :='blabla';
po := @sign;
FillMemory( @buf, 512, 0 );
MoveMemory( @buf, po , Sizeof( SIGN ));
...
Wenn ich es so mache ist der ergebniss immer noch nicht ganz ok,
oder ich habe vieleicht andere vorstellung von der erg.