续结我问的上一个问题 |
答題得分者是: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 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |