AAAAArrrrrrrrrggggghhhhhhhh.......
I feel completely stupid!!!!!
Thank you for the Hint Jonas, using pxBuffer^ did the trick!
Michael
Am 22.04.20 um 11:15 schrieb Jonas Maebe:
On 22/04/2020 00:09, Michael Ring via fpc-devel wrote:
function memset(pxBuffer:pointer; value : byte; count : Tsize):pointer;
cdecl;
begin
FillChar(pxBuffer,count,value);
Result := pxBuffer;
end;
You need pxBuffer^ instead of pxBuffer (you want to fill the block to
which pxBuffer points, not the 4 bytes of pxBuffer itself).
Jonas
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
