DelphiRAD XE字体64位.rar

Delphi 7 等旧版本的窗体字体可以用FormDesign键值重新定义,但RAD XE 版本修改窗体默认字体在网上从来没有人发过,折腾了一下午,这里提供一个新版本的修改默认字体的方法,当前是64为操作系统,32位请自行修改。 方法很简单,就是修改注册表[HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Windows NT\CurrentVersion\FontSubstitutes],将MS Shell Dlg 2修改为宋体,但字号仍然无法选择,因为字体高度被设置为-MulDiv(8, ScreenLogPixels, 72),如果需要修改,请自行修改source中的Vcl.Graphics文件,并重新编译。附件是注册表文件,需要的请下载。