|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2004/4/22 14:07:39 |
标题: |
|
加入我的收藏 |
楼主: |
有这样的一个小程序段: 是浏栏报表的,qrpreview1空件是防止form2的 procdure tform1.onmypreview; begin form2.qrpreview1.qprinter:=tqrprinter(sender); form2.showmodal; end;
procedure tform1.formcreate(sender;tobject); begin qrprinter.onpreview:=onmypreview; end;
他提示的错误是:tqrprinter没有定义
请问是错在那里?是不是还要加一个单元文件? 谢谢!!!!!
----------------------------------------------
- |
作者: |
|
2004/4/22 15:27:18 |
1楼: |
你可以在type的下面定义qrprinter: Tqrprinter 我也不知道对不对我是初学的!你试试看吧!
----------------------------------------------
学无止境!!!
|
作者: |
|
2004/4/22 15:36:47 |
2楼: |
你那个procdure tform1.onmypreview; begin form2.qrpreview1.qprinter:=tqrprinter(sender); form2.showmodal; end; 里面的form2拿来的?能行么?
----------------------------------------------
-
|
|