소스 검색

* Apply path in Mantis report 8103 to fix ansi2wide issue

git-svn-id: trunk@5916 -
daniel 18 년 전
부모
커밋
a6a0745436
1개의 변경된 파일2개의 추가작업 그리고 1개의 파일을 삭제
  1. 2 1
      rtl/unix/cwstring.pp

+ 2 - 1
rtl/unix/cwstring.pp

@@ -219,11 +219,12 @@ procedure Ansi2WideMove(source:pchar;var dest:widestring;len:SizeInt);
             begin
               { skip and set to '?' }
               inc(srcpos);
+              dec(len);
               pwidechar(destpos)^:='?';
               inc(destpos,2);
               dec(outleft,2);
               { reset }
-              iconv(iconv_wide2ansi,@mynil,@my0,@mynil,@my0);
+              iconv(iconv_ansi2wide,@mynil,@my0,@mynil,@my0);
             end;
           ESysE2BIG:
             begin