算了,给你写一段代码吧
var
AMemoView: TfrMemoView;
begin
if frReport1.Pages[0].FindObject('Memo1') <> nil then
begin
AMemoView := TfrMemoView(frReport1.Pages[0].FindObject('Memo1'));
if (AMemoView <> nil) and (AMemoView.Tag = '1') then
AMemoView.Visible := False;
end;
end;