|
@@ -2296,5 +2296,6 @@ End;
|
|
Function ToSingleByteFileSystemEncodedFileName(const Str: RawByteString): RawByteString;
|
|
Function ToSingleByteFileSystemEncodedFileName(const Str: RawByteString): RawByteString;
|
|
Begin
|
|
Begin
|
|
Result:=Str;
|
|
Result:=Str;
|
|
- SetCodePage(Result,DefaultFileSystemCodePage,True);
|
|
|
|
|
|
+ if StringCodePage(Result)<>DefaultFileSystemCodePage then
|
|
|
|
+ SetCodePage(Result,DefaultFileSystemCodePage,True);
|
|
End;
|
|
End;
|