Delphi枚举可用字体，也就是列出windows系统中所有安装的字体名称，向组合框中添加系统中已经安装的字体名称，若选中字体后，可改变R i c h E d i t组件中文字的字体。-The Delphi enumeration of fonts, also is the list of all installed fonts name windows system, add the font name is already installed in the system to the combo box, if the selected font, can change the R I c h E d i t text components in the font.