多页fastreport怎么动态设memo(再加50分) ( 积分: 50 )

干

干部

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-30

• #1

一个页的时候可以用
frReport1.FindObject('Memo1').Memo.Text:=edit1.text;
如果是多页的时候呢
frReport1.Pages[1].FindObject('Memo1').Memo.Text:=edit1.text;
报错，应该怎么写。

 

干

干部

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-30

• #2

一个页的时候可以用
frReport1.FindObject('Memo1').Memo.Text:=edit1.text;
如果是多页的时候呢
frReport1.Pages[1].FindObject('Memo1').Memo.Text:=edit1.text;
报错，应该怎么写。

 

W

weiweike

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-30

• #3

var
t,b: TfrMemoView;
begin
b := TfrMemoView(frReport1.Pages[0].FindObject('Memo1'));
t := TfrMemoView(frReport1.Pages[1].FindObject('Memo2'));
if t <> nil then
t.Memo.Text :='FastReport';
b.Memo.Text :='FastReport0';
frReport1.ShowReport;

 

唐

唐佐平

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-30

• #4

http://www.zptang.ys168.com/
有 Fast Report 的中文使用手册和例子