ZeroMemory(@vVar,SizeOf(vVar));
Souvent dans les appels aux Api Windows on utilise un Buffer.
sous la forme adresse/longueur comme :
APIWindows(AHandle, pchar(vBuffer), length(vBuffer));
On serait tenté d'avoir la taille du Buffer avec sizeof
(comme en C) mais il faut utiliser length
SetLength(vBuff,24 ); vTestS:=sizeof(vBuff); // = 8 (la taille du pointeur probablement) vTestL:=length(vBuff); // = 24 (la taille réelle du buffer)
function IToQ(val: int64): QWord; var pQ: PQWord; begin pQ := @val; Result := pQ^; end;
absolute
var vI:int64; vO: TObject; begin vO:=TObject(pointer(vI)); end;
var vI:int64; vO: TObject; begin vI:=ptrint(vO); end;