* String -> AnsiString

rtl/win/sysdl.inc

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