frReport3.0里如何对memo控件赋值？(10分)

以前版本FR的代码frreport1.FindObject('memo1').memo.Text:=edit1.text
在3.0里通不过

procedure TFdy_qrd.frxReport1GetValue(const VarName: String;
var Value: Variant);
begin
if VarName='zh' then
Value:=edit1.Text;
if VarName='hm' then
Value:=edit2.Text;
if VarName='ye' then
Value:=edit4.Text;
if VarName='dz' then
Value:=edit6.Text;
if VarName='rq' then
Value:=FormatDateTime('yyyy年mm月dd日',strtodatetime(MaskEdit1.Text));
if VarName='xm' then
Value:=edit9.Text;
end;

上面这是给变量赋值，
给Memo赋值看这儿：
http://www.chenxy.com/index_Article_Content.asp?fID_ArticleContent=31
中间有段代码就是。

赋值:
(frxRep.FindObject('memo1') as TfrxMemoView).Text := edit1.text
字段赋值:
(frxRep.FindObject('memo1') as TfrxMemoView).DataSet := dmdata.frxDBAgedAR;
(frxRep.FindObject('memo1') as TfrxMemoView).DataField := 'trader';
字段trader 是dmdata.frxDBAgedAR中的字段.

多人接受答案了。