Jonas Maebe wrote: >> How to I solve this compiler hint? > > Don't cast ordinals to pointers.
:-) > Replace the PtrUInt types casts with PByte (or Pointer) type casts. So in that case because a untyped parameters are treated like generic Pointer types whereby arithmetic increments in byte size, I don't actually need any type casts the parameters at all? Is the code below safe? It seem to work fine in our projects and data. procedure XorBlock(var InData1, InData2; Size: longword); var i: longword; begin for i:= 1 to Size do Pbyte(@InData1+i-1)^ := Pbyte(@InData1+i-1)^ xor Pbyte(@InData2+i-1)^; end; Regards, - Graeme - -- fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal http://opensoft.homeip.net/fpgui/ _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal