線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1663
推到 Plurk!
推到 Facebook!

如何在Quick Report 只瀏覽,不列印

答題得分者是:careychen
ann6029
一般會員


發表:7
回覆:5
積分:2
註冊:2004-11-02

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-09-24 14:44:28 IP:59.125.xxx.xxx 訂閱
各位高手,
在Quick report 報表只留可瀏灠button,列印button闗掉?
謝謝幫忙!
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-09-24 15:55:56 IP:220.141.xxx.xxx 訂閱
高手不敢當,不過是網路流浪漢。
QuickRep如何实现预缆时隐藏 print setup 和 print 按钮
http://topic.csdn.net/t/20020927/13/1058128.html
------
努力會更接近成功
ann6029
一般會員


發表:7
回覆:5
積分:2
註冊:2004-11-02

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-09-30 10:24:11 IP:60.244.xxx.xxx 訂閱

===================引 用 pceyes 文 章===================
高手不敢當,不過是網路流浪漢。
QuickRep如何实现预缆时隐藏 print setup 和 print 按钮
http://topic.csdn.net/t/20020927/13/1058128.html

我的程式裡的需要列印的報表很多,但只有一個或兩個報表只要瀏灠不列印,若按照這樣做,
那其它的報表是否都不能列印了???
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-09-30 16:31:09 IP:220.141.xxx.xxx 訂閱
C:\Program   Files\Borland\CBuilder5\Lib\Obj\qrprv.dfm
copy 成
C:\Program Files\Borland\CBuilder5\Lib\Obj\qrprv_p.dfm // <- 可以列印
C:\Program Files\Borland\CBuilder5\Lib\Obj\qrprv_v.dfm // <- 只能檢視
平常要編譯可以列印時,先將qrprv_p.dfm拷回去
要編譯只能檢視時,再將qrprv_v.dfm,畢竟這個部分很少使用呢!
------
努力會更接近成功
careychen
尊榮會員


發表:41
回覆:580
積分:959
註冊:2004-03-03

發送簡訊給我
#5 引用回覆 回覆 發表時間:2008-09-30 22:15:04 IP:59.126.xxx.xxx 訂閱
HI~~, 如果你要動態的話,下面這段跟著我做一下,不過,要記得先備份你的QuickReport

第一、先打開 QuickRep 的 Runtime package
找到 QuickRep.pas
打開後,按下搜尋找

procedure Preview;

找到後,把他改成

procedure Preview(bShowPrint: Boolean = True);

然後按下 ctrl shift 向下鍵 會跳到對應的 procedure , 把這個也要改一下
在這個 procedure 裡面有個

QRPrinter.Preview 改成 QRPrinter.Preview(bShowPrint);

OK , 這個 pas 檔完成


第二、打開 QRPrntr.pas 這個檔
然後一樣是搜尋

procedure preview; 跟著上面的改法一樣
不過這個 procedure 裡面有下面這段

with GlobalPreviewInterface.Create(nil) do
try
PreviewControl := Show(Self);
TQRStandardPreview(PreviewControl).Print.Visible := bShowPrint; // 加上這句
finally
Free;
end;


然後重新 Compiler 這個元件
基本上操作跟原本一模一樣

QuickRep1.Preview;

如果不想秀 print 按鈕時才加

QuickRep1.Preview(false);

其他你想自己加什麼,就自己玩囉!!
------
價值的展現,來自於你用哪一個角度來看待它!!
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#6 引用回覆 回覆 發表時間:2008-10-01 06:53:07 IP:122.127.xxx.xxx 訂閱
careychen 大大寫得非常棒,也很仔細,不是吐曹,只是在站上找到一些前人的資料,提供更多參考。

報表設計開發討論區(Delphi) » QuickReport之預覽及列印
http://delphi.ktop.com.tw/board.php?cid=30&fid=100&tid=45447

報表設計開發討論區(Delphi) » QuickRep 如何只予覽,不能打印
http://delphi.ktop.com.tw/board.php?cid=30&fid=100&tid=45447
------
努力會更接近成功
careychen
尊榮會員


發表:41
回覆:580
積分:959
註冊:2004-03-03

發送簡訊給我
#7 引用回覆 回覆 發表時間:2008-10-01 09:11:37 IP:218.210.xxx.xxx 訂閱

就是要這樣,才有更多的學習和方向~~! 讚啦!
------
價值的展現,來自於你用哪一個角度來看待它!!
系統時間:2024-05-05 7:05:00
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!