本文整理自网络，侵删。
在工程文件头加入 Windows引用
在begin后加入
SetThreadLocale(
DWORD(Word(SORT_DEFAULT) shl 16) or
DWORD(Word(SUBLANG_CHINESE_SIMPLIFIED) shl 10) or
DWORD(Word(LANG_CHINESE))
);
原理：设置程序的所在区域
方法来自互联网，备忘~
相关阅读 >>
Delphi 泛型容器单元(generics.collections) tdictionary<t>
更多相关阅读请进入《Delphi》频道 >>
