Răsfoiți Sursa

* call unicodestring version of ExpandUNCFileName from ansistring version
instead of infinitely recursing into the ansistring version

git-svn-id: branches/cpstrrtl@25044 -

Jonas Maebe 12 ani în urmă
părinte
comite
8368f7dba5
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      rtl/win/sysutils.pp

+ 1 - 1
rtl/win/sysutils.pp

@@ -184,7 +184,7 @@ var
   u: unicodestring;
 begin
   { prevent data loss due to unsupported characters in ansi code page }
-  u:=ExpandUNCFileName(filename);
+  u:=ExpandUNCFileName(unicodestring(filename));
   widestringmanager.Unicode2AnsiMoveProc(punicodechar(u),result,DefaultRTLFileSystemCodePage,length(u));
 end;