uses
FR_Class, FR_View;
---------------------------------------------------
//打印事件中
var
T : TfrMemoView;
begin
T := TfrMemoView(frReport.FindObject('memo1'));
if T <> Nil then
if AdoQuery.IsEmpty then
T.Memo.Text := ''
else
T.Memo.Text := '[AdoQuery."a"]';
end;
怎么还是不行啊，我在一个按钮中的click事件中写的
var T: TfrMemoView;
begin
if adoquery1.IsEmpty then
exit;
T := TfrMemoView(frReport1.FindObject('memo10'));
if T <> Nil then
if adoquery1.IsEmpty then
T.Memo.Text:=''
else
T.Memo.Text:='[adoquery1."名称"]';
frreport1.ShowReport;
end;
可以预览，但是没有东西啊，我的控件是memo10,而且我按F8键运行的，memo10.text也给赋值了
