急!!!关于 FastReport 的问题(100分)

  • 主题发起人 主题发起人 Ziff
  • 开始时间 开始时间
Z

Ziff

Unregistered / Unconfirmed
GUEST, unregistred user!
1.. 谁能搞到 Fr_Class.pas 文件,我当的是 FastReport 2.46 版本的 Trail Version,
无Fr_Class.pas 不能改简直他妈的太不爽了!!
2.. 谁能告我如何在 FR 的 Disign 模式下, 如何在Memo 中调用主窗口的 Procedure ????
我看了 FR 的 Faq.Txt文件, 按照他说的方法试过但没有解决问题
谢了先
 
我有,怎么给你。
 
这个问题也很简单,我已经帮你解决了问题,给分呀。别说话不算数。
以下是一个例子。对你有帮助,道理是一样的。在设计期,是不可以做到直接调用主窗体的过程和函数的。但是在预览期间,是可以的。
你再创建一个FORM,比如FORM2,上面放EDIT控件,一个BUTTON。把BUTTON的MODALRESULT属性设置
为MROK,好,可更改数据的窗体就创建完毕。你可以根据你需求,在上面放任何数量你想更改数据对应的
EDIT控件。你自己看着办。
在你放FRREPORT组件的窗体中,USES 这个新创建的窗体单元。
写如下代码(我放FRREPORT的窗体是FORM1)。
//=========激活FRREPORT frreport1objectclick为自定义过程
//声明为public
// procedure frReport1ObjectClick(View: TfrView);
procedure TForm1.FormDblClick(Sender: TObject);
begin
frreport1.OnObjectClick:=frreport1objectclick;
frreport1.ShowReport;
end;
procedure TForm1.frReport1ObjectClick(View: TfrView);
begin
form2:=tform2.Create(self);
form2.Edit1.text:=view.Memo.Text;
form2.showmodal;
if form2.ModalResult=mrok then
view.memo.Text:=form2.edit1.text;
end;
当然,你不会立刻看到更改效果,你更改下显示比例就会看到效果。
满意,就给分呀!
 
两位大哥,我现在也下了fastreport 2.46
但是也需要,fr_class.pas 文件,能否赏小弟一份
geng00@sina.com
 
Ziff_Tang@Hotmail.com
白天很忙,现在才抽空上网,
我的问题是:在设计期,就是在画框儿的时候,
在一个Memo中的 Text Editor 中
如何调用自定义的一个函数,并把返回值放回 Memo 中
是不是我的思路错了??望告知
另外希望 Fr_Class.pas 文件谢了!!
 
我发一份freport 2.46 至fastreport@sina.com,需要可以下password=1111
 
自己改原代码吧,没有办法。
 
后退
顶部