Browse Source

merge r14130 from cpstrnew branch by paul:
pass unicodestring to rawbytestring arguments with converting to default system code page

git-svn-id: trunk@19091 -

paul 14 years ago
parent
commit
848ca6b0c0
1 changed files with 4 additions and 0 deletions
  1. 4 0
      rtl/inc/ustrings.inc

+ 4 - 0
rtl/inc/ustrings.inc

@@ -320,7 +320,11 @@ begin
   result:='';
   Size:=Length(S2);
   if Size>0 then
+  begin
+    if cp=$ffff then
+      cp:=DefaultSystemCodePage;
     widestringmanager.Unicode2AnsiMoveProc(PUnicodeChar(Pointer(S2)),result,cp,Size);
+  end;
 end;