在报表的onpreview事件中加入:
with TFrmMyPreview.Create(Application) do
begin
QRPreview1.QRPrinter := TQRPrinter(Sender);
CurRep := self;
Show;
end;
with TFrmMyPreview.Create(Application) do
begin
QRPreview1.QRPrinter := TQRPrinter(Sender);
CurRep := self;
Show;
end;
解决方案 »
- create函数用overload问题
- WinXP(sp2)下安装Delphi7自动终止,如何解决?
- 如何做一个类似与微软的explorer.exe程序呢,大侠们请帮忙。
- 请看看这个程序
- 大虾们请进,高分寻求关于表更新的SQL语句的问题。
- 初学者的弱智问题,谢谢!
- 很简单的问题
- 如何装fast report?谢谢!
- 很菜的问题:接口之间怎样赋值
- 抢分问题二:如何把用query查询出的结果放到combobox的picklist中去,然后用locate进行模糊查询。
- 怎么样能够把菜单和按钮欠入到ie里面
- 我用AddFontResource装载了字体文件,我想把edit的字体设为这个字体文件的字体,该怎么做呢?
到这句就出错了!