Hans-Peter Diettrich <[email protected]> hat am 31. Oktober 2011 um 15:31
geschrieben:

> I'm not sure, but the handling of Wide/Unicode strings looks wrong:
>
>      vaBinary, vaLString, vaWString{$IFNDEF VER2_2}, vaUString{$ENDIF}:
>        begin
>          Count:=ReadIntegerContent;
>          SkipBytes(Count);
>        end;
>
> For WideChars Count*2 bytes have to be skipped, according to e.g.
> ReadWideString. 
Thanks for the hint.
Fixed in svn trunk.
 
Mattias
 
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to