Delphi 编译程序乱码(非中文系统)的处理

Delphi7 编译的程序是 非unicode程序，在非中文系统环境下，会出现乱码

方法一：

1、在控制面板，区域-格式：

 2、区域，管理，设置：

 3、在主界面程序里面加

initialization
  SetThreadLocale($0804); //2052
  setconsoleoutputcp(936);

方法二：

使用 Microsoft Applocale 工具将程序转换成指定的语言格式，点击加载

但是，TMemo进行lines.add 后还是会出现乱码，要进行特殊处理 

创建时间：2021.04.27　　更新时间：

Delphi 编译程序乱码(非中文系统)的处理