[fpc-pascal] Problem with StrMove() in a unit compilable in FPC and Delphi

[silvioprog]

Well, the problem persists, and I can't understand why this attached
project works only if compiled with Delphi. The results:

Delphi:

Length: 3
aañ

FPC:

Length: 5
aA£A±

Lazarus 1.6 r51630 FPC 3.0.0 i386-win32-win32/win64

-- 
Silvio Clécio
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20160225/3506a993/attachment.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: ansi_test.zip
Type: application/zip
Size: 1631 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20160225/3506a993/attachment.zip>