续结我问的上一个问题 |
|
答題得分者是：xxiaowang
|
|
ntjrr
高階會員   發表：240 回覆：312 積分：110 註冊：2005-04-24 發送簡訊給我 |
引言:
--------------------------------------------------------------------------------
结合了前辈的指点，又查找了一些相关的资料，最终运行成功的代码如下：
procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
var
t:TfrxMemoView;
begin
t := TfrxMemoView(frxReport1.FindObject('Memo17'));
t.memo.text:='一二三四五六七';
t.Visible:=true;
t.Width:=120;
t.Height:=50;
t.Left:=100;
t.Top:=16;
哪位前辈再帮我查看一下代码有无不妥之处，如果没有不合适的，就写在这里抛砖引玉。谢谢！ -------------------------------------------------------------------------------- Hi,ntjrr,
我知道在Fr2.5里,onbeforeprint事件是每画一个元件都会触发一次的，fr3.0是不是这样，你写一句showmessage测试一下好了。如果如我所言是每画一个元件都会触发一次的，则你这段代码也会运行N次，效率极低。所以建议加上判断式来判断是否是Memo17，再运行代码；或者干脆将这段代码写在触发打印的Button的Onlick下就好了。
ntjrr测试后的问题：
将这段代码写在触发打印的Button的Onlick下后，程序可以编绎，也没有什么错误提示，但就是设置的值不生效！ 發表人 - ntjrr 於 2005/08/10 22:34:49
------
我的编程起步于ktop，我将永远支持ktop |
|
xxiaowang
中階會員 發表：51 回覆：75 積分：55 註冊：2005-01-26 發送簡訊給我 |
|
|
ddy
站務副站長  發表：262 回覆：2105 積分：1169 註冊：2002-07-13 發送簡訊給我 |
發表時間：2005-08-10 22:32:29
IP:222.184.xxx.xxx 未訂閱
系統時間：2024-05-05 2:20:19
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |