瀏覽代碼

* GetLoadErrorStr (currently) returns a ShortString, so avoid a useless conversion to AnsiString

git-svn-id: trunk@45329 -
svenbarth 5 年之前
父節點
當前提交
3c79a8dd81
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/win/sysdl.inc

+ 1 - 1
rtl/win/sysdl.inc

@@ -59,7 +59,7 @@ begin
                  MakeLangId(LANG_NEUTRAL, SUBLANG_DEFAULT),
                  @temp[1], 255,nil);
   SetLength(temp,c);
-  Result:=AnsiString(temp);
+  Result:=String(temp);
 end;
 
 const