FAST REPORT报表(50分)

  • 主题发起人 主题发起人 fossil
  • 开始时间 开始时间
F

fossil

Unregistered / Unconfirmed
GUEST, unregistred user!
1。form上的EDIT 里面的时间如何在报表里面显示
2。在报表的页尾显示当前时间
 
1.方法:
在报表中增加一个TfrMemoView 。
填入一个字符串 str 作为Form与FR传输变量的一个参数并用[]括起。
在程序中写frVariables['str']:=Edit1.text;即可。
2.方法:
在报表上增加一个函数TIME即可。
 
coldew:你能在说明白点吗?
我在报表上frMemoView 的begin
END 之间 写上了
begin
frVariables['str']:=EndDateEdt.Text;
end 然后预览报错说 没有定义EndDateEdt.Text,这是怎么回事情?
2.这个函数是它自带的吗,在那里
 
我以前都是在临时表里的字段放入变量。
在报表时很容易处理。
 
begin
frVariables['str'] := Form1.EndDateEdt.Text;
end
你应这样写,你得指写EndDateEdt是那个Form上的才可。
当然了,这样怕也不行,你最好还是通过参数据变量来作
procedure TMainFrm.bbPreviewClick(Sender: TObject);
begin
if adodMain.IsEmpty then
Exit;
if sReportFileName = '' then
Exit;
if not FileExists(sReportFileName) then
Exit;
frReport.LoadFromFile(sReportFileName);
frReport.Dictionary.Variables['SysVar'] := SysVar;
//为报表添加参数
frReport.ShowReport;
end;

然后再在TfrMemoView的begin
end间加上你的程序
begin
text := SysVar;
//SysVar就是添加的系统变量
end;

在TfrMemoView中选择一个日期函数就可以得到当前的系统时间了
其它同理。
 
在报表中增加一个TfrMemoView 。
填入一个字符串 str 作为Form与FR传输变量的一个参数并用[]括起。
在程序中写frVariables['str']:=Edit1.text;即可。
我赞同
 
在报表中增加一个TfrMemoView 。
填入一个字符串 str 作为Form与FR传输变量的一个参数并用[]括起。
在程序中写frVariables['str']:=Edit1.text;即可。
---这样的话,在IDE中设计报表会报错,最好使用数据字典,在那里可以增加变量,定义的变量
可以直接使用,不必用OnBeforPrint script.然后在程序中动态赋值:
frReport1.LoadFromFile(...)
frReport1.Dictionary.Variables['var1'] := 'XXXXXX';
frReport1.ShowReport
 
to fossil
是在程序中添加不是在报表中加。我次次都是这样用的。
第二个问题,这个函数也找不到。那你在报表中不用函数吗?
 
多人接受答案了。
 
后退
顶部