如何设置程序的字符集?急!!!

Question

如：
      Font.Name := 'Times New Roman';
      Font.Size := 10;

Answer 1

定义一个全局字体变量TFont,
在程序启动时加载，在每个FORM创建时赋值，FORM内所有控制均不另选择字体
如Form1OnCreate:
   Form1.Font:=VarFont;

Answer 2

只要在窗口中设就行，窗口里的控件的font默认与它的一样；form1onshow中加入form1.font.charset:='GB2312_CHARSET';

Answer 3

没有font属性的控件好象没有办法设的，不过你可以在你需要的环境下重编译一下。最好是作成多语言的方式，那就只改资源就可以了