FastReport打印每条纪录之前如何预处理。

Question

FastReport中，我想在每条纪录显示到预览窗体之前，预处理一下，比如给某些文本框赋值或在某些图片框上画几个字符。我需要的是每条纪录打印前分别作预处理。

Answer 1

var
t:tfrmemoview;
begin
  t:=tfrmemoview(frreport.findobject('memo1'));
  t.Memo.Text:='abc';
end;

Answer 2

在FR的ON　BEFORE　PRINT事件中：
var T:TfrMemoView;
t:= TfrmemoView(frReport1.FindObject('memo3'));
if t <> nil then BEGIN T.Memo.CLEAR;
T.Memo.Add('123'));END;
FRREPORT1.LoadFromFile('D:\RSC\FRTRY2.FRF');
FRREPORT1.PrepareReport;
FRREPORT1.ShowReport;