FastReport怎样在程序中定义frReport中Memo文本框中的内容?(100分)

K

karnor

Unregistered / Unconfirmed
GUEST, unregistred user!
FastReport怎样在程序中定义frReport中Memo文本框中的内容?
 
使用frReport 的设计器的数据字典定义变量 MyMemo
相应的 Memo 的内容指定为 MyMemo
然后在 showReport 之前 对 MyMemo赋值
with frReport1.Dictionarydo
begin
Variables['MyMemo'] := ''''+'My Memo View'+'''';
end;

frVariables['MyMemo'] := 'My Memo View';
 
bbf.frreport1.FindObject('memo12').memo.text:='日期为从:'+datetostr(datetimepicker1.date)+'到'+datetostr(datetimepicker2.date);
 
procedure TForm1.frReport1GetValue(const ParName: String;
var ParValue: Variant);
begin
if parname='jun' then
parvalue:='jun''s value';
end;

procedure TForm1.Button1Click(Sender: TObject);
begin

frReport1.LoadFromFile('f:/jun.frf');
frReport1.ShowReport ;
end;
 
顶部