请大侠指点！

Question

使用Screen.Fonts集合或者Print.Fonts集合。

Answer 1

screen和printer都是Delphi中的全局对象。

Answer 2

Richedit1.Font.Name:='宋体';  //把Richedit的字体设为宋体
Richedit1.Font.Size：＝10;    //大小设为10号字

Answer 3

可以设置richedit的font的值,
还可以设置fontstyle属性
  var 
    style:tfontstyle;
  begin
    style:=[];
    style:=style+[fsbold,fsitalic]'
//包括fsbold,fsitalic,fsunderline,fsstrikeout
    richedit1.font.style:=style;
  end; 
谢谢了,给分吧

Answer 4

直接给Font属性付值就行！
察看TFont的帮助