QuickRep 問題 |
缺席
|
css
一般會員 發表:24 回覆:17 積分:8 註冊:2006-08-31 發送簡訊給我 |
// 例如
Case RadioGroup1.ItemIndex of 0:begin // 點陣印表 BrotherReport_Form.BRF_QuickRep1.Page.PaperSize:=Letter; BrotherReport_Form.BRF_QuickRep1.Page.Length :=279.40; BrotherReport_Form.BRF_QuickRep1.Page.Width :=215.90; BrotherReport_Form.BRF_QuickRep1.Page.BottomMargin:=5.0; BrotherReport_Form.BRF_QuickRep1.Page.TopMargin:=5.0; end; 1:begin // 雷射 BrotherReport_Form.BRF_QuickRep1.Page.PaperSize:=A4; BrotherReport_Form.BRF_QuickRep1.Page.Length :=297.0; BrotherReport_Form.BRF_QuickRep1.Page.Width :=210.0; end; else BrotherReport_Form.BRF_QuickRep1.Page.PaperSize:=Default; end; 請問我如何將 BrotherReport_Form.BRF_QuickRep1 (不同程式不同 BrotherReport_Form &BRF_QuickRep1) 寫一個公用程式 讓所有程式可去呼設定它,避免每支程式,都要寫下述程序 Case RadioGroup1.ItemIndex of 0:begin // 點陣印表 .............Page.PaperSize:=Letter; .............Page.Length :=279.40; .............Page.Width :=215.90; .............Page.BottomMargin:=5.0; .............Page.TopMargin:=5.0; end; 1:begin // 雷射 .............Page.PaperSize:=A4; .............Page.Length :=297.0; .............Page.Width :=210.0; end; else ......................Page.PaperSize:=Default; end; .......... 是不一項 , page 其後面是一樣的 謝謝 |
GrandRURU
站務副站長 發表:240 回覆:1680 積分:1874 註冊:2005-06-21 發送簡訊給我 |
真是太不認真了!
解答都拉一半出來了,還給缺席評價!? 以下一星期沒回應就清掉了 ===已清除=== |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |