G gltv Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-25 #1 1，我想知道 fastreport 共有几页，怎么也做不出来，为什么 2，比如我想把制单人写到每一页的页头上，怎么搞，我是刚用fastreport 所以有很多我都不明白
快 快乐的蚂蚁 Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-25 #2 1.好像有相应的函数 2.拉一个memo放在页头就可以了
D dez_0609 Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-25 #3 1、在band上放一memo，双击该memo,写上： 共[Pages#]页 2、在Page header band上放一memo1 procedure TForm1.Button1Click(Sender:TObject); begin ... frReport1.FindObject('memo1').Memo.Text:=Edit1.Text;//制表人 ... end;
1、在band上放一memo，双击该memo,写上： 共[Pages#]页 2、在Page header band上放一memo1 procedure TForm1.Button1Click(Sender:TObject); begin ... frReport1.FindObject('memo1').Memo.Text:=Edit1.Text;//制表人 ... end;
W wwwwb Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-26 #5 1、在band上放一memo，双击该memo,写上： 共[totalpages]页 将两遍报表选上即可； 2、在FR的BEFORE PRINT事件中： var t: TfrMemoView; begin t := TfrMemoView(frReport1.FindObject(‘Memo1‘)); if t <> nil then t.Memo.Text := ‘FastReport‘; end;
1、在band上放一memo，双击该memo,写上： 共[totalpages]页 将两遍报表选上即可； 2、在FR的BEFORE PRINT事件中： var t: TfrMemoView; begin t := TfrMemoView(frReport1.FindObject(‘Memo1‘)); if t <> nil then t.Memo.Text := ‘FastReport‘; end;
