怎样修改Fastreport新建控件的默认字体？(50分)

我用fastreport中的例子作动态报表：
但生成的MEMO字体都是“Airal”“10”
怎样让系统所有的默认字体都是“宋体”“9”“GB2312”？？？

这个可能要改改源码~~~

版主：
　这个问题已经自己搞定！
　怎样能收回分？？

还是不行！！！
下列程序中，如何指定MEMO的字体、字号？？？
procedure TForm1.Button1Click(Sender: TObject);
var
v: TfrView;
b: TfrBandView;
Page: TfrPage;
begin
frReport1.Pages.Clear;
frReport1.Pages.Add;
// create page
Page := frReport1.Pages[0];

b := TfrBandView(frCreateObject(gtBand, ''));
// create MasterData band
b.SetBounds(0, 20, 0, 20);
b.BandType := btMasterData;
b.Dataset := 'frDBDataSet1';
Page.Objects.Add(b);

v := frCreateObject(gtMemo, '');
// create data field
v.SetBounds(20, 20, 200, 16);
v.Memo.Add('[Table1."Company"]');
Page.Objects.Add(v);

frReport1.ShowReport;
end;

自己搞定！！
Nizvoo
只有你一个人回答，虽然是废话。。。但，分只有给你了。
还是要谢谢你，如今的大富翁，想找高手解决的问题太难了！常常是连回答问题的都没有

接受答案了.

对不起，一整个晚上我都同去了。我才回来没多久。所以我没来关注。
我不是高手。加上我也没有用过FastReport的，但我用过RMReport。建议你
使用www.pcjingning.com做这个的whf也是这里的富翁，你有空去他论坛转转
兴许有所发现。
你能不能把你的解决方法讲讲。好让大伙学习学习

说起来简单：
TfrMemoView(v).Font.Name:='黑体';
TfrMemoView(v).Font.Size:=14;
我的工资程序快做完了，做完了发个给你！

Nizvoo@etang.com我的信箱。