一个简单的我又不知道的问题。

Question

一个例子：  Font.Name := 'Courier New';
  Font.Size := 24;

Answer 1

一个窗口里的控件的默认字体是它所在的窗口的字体。
    我觉得这是没办法的事，每个窗口的默认字体是做在窗口控件里面的，通过delphi来改应该不行。    或许有一个办法，像word的修改一个文件后，去覆盖它的模板文件，但我不知道有没有delphi的form的模板文件，即使有，也要小心一点

Answer 2

to:
johnsonrao(johnson)
你那样我下次启动delphi时，又成delphi的默认字体了。

Answer 3

那是系统字体，可以在Window系统里面改。

Answer 4

delphi注册表的基本键值：
HKEY_CURRENT_USER\Software\Borland\Delphi\4.0 
1、改变属性编辑器颜色
对应键值{basekey}\Globals\PropValueColor
可以改成graphics.pas中的字符常数
如clred,clblue...
2、控件面板的自动选择
对应{base key}\Extras\AutoPaletteSelect
值为1时有效，0时无效。
3、控件面板的自动滚动
对应{base key}\Extras\AutoPaletteScroll
值为1时有效，0时无效
4、改变Form的缺省字体
对应{basekey}\FormDesign\DefaultFont 
值Arial,10,Bold 对应{basekey}\FormDesign\DefaultFont “宋体,9”
注意是新建一个项，不是在原来的“Form Design”下加修改后重启Delphi就行了。

Answer 5

我曾经问过：
最简单的问题：如何使form1每次打开总是 字体=宋体10号字？　回复人：kxy(手举穿肠毒药，怀抱刮骨钢刀)　(2001-5-24 14:59:00)  得5分 
修改注册表HKEY_CURRENT_USER\Software\Borland\Delphi\5.0 
添加一个新的Key：FormDesign 添加一个新的string值DefaultFont 
例如  宋体，10