用Printer()列印非A4紙張的換頁問題 |
尚未結案
|
windheartalan
一般會員 發表:21 回覆:23 積分:8 註冊:2005-03-24 發送簡訊給我 |
|
shunaaron
高階會員 發表:13 回覆:94 積分:106 註冊:2006-10-06 發送簡訊給我 |
去設一台印表機出來~
把印表機名字取如:dd 並選好要Print的紙張大小 程式那去uses Printers 在程式式要PRINT時 寫一段 indx := Printer.Printers.IndexOf('dd') ; if indx <> -1 then bgin 再將indx指向你的print end; 這樣就OK了 ===================引 用 windheartalan 文 章=================== 各位大大好,利用Printer()來做列印的功能,小弟已經知道如何利用, 但現在小弟碰到一個問題, 當我列印完一份我要印的東西,使用Printer->EndDoc()後, 都會跳約A4大小的紙張高度後,下一份才會開始印, 也就是說,採用不同於A4格式的紙張列印時,我不知道要如何通知印表機, 根據該紙張格式正確的換頁,或是說有辦法設定紙張的大小? 請問有人可以指點一下嗎? 在這先謝謝各位了
------
程式沒有這麼難 只是還沒打通其中要絕
編輯記錄
shunaaron 重新編輯於 2008-05-09 01:59:20, 註解 無‧
|
windheartalan
一般會員 發表:21 回覆:23 積分:8 註冊:2005-03-24 發送簡訊給我 |
首先謝謝shunaaron大大的回覆,
但當中還有疑問未解, 所謂的"把印表機名字取如:dd",是指宣告dd為Printer嗎? 比方說是這樣? TPrinter *dd= Printer(); 再者,"選好要Print的紙張大小",我就是這個部份不知道, 請問可否稍微說明詳細些,或是舉個實例,非常感謝~ ===================引 用 shunaaron 文 章=================== 去設一台印表機出來~ 把印表機名字取如:dd 並選好要Print的紙張大小 程式那去uses Printers 在程式式要PRINT時 寫一段 indx := Printer.Printers.IndexOf('dd') ; if indx <> -1 then bgin 再將indx指向你的print end; 這樣就OK了 ===================引 用 windheartalan 文 章=================== 各位大大好,利用Printer()來做列印的功能,小弟已經知道如何利用, 但現在小弟碰到一個問題, 當我列印完一份我要印的東西,使用Printer->EndDoc()後, 都會跳約A4大小的紙張高度後,下一份才會開始印, 也就是說,採用不同於A4格式的紙張列印時,我不知道要如何通知印表機, 根據該紙張格式正確的換頁,或是說有辦法設定紙張的大小? 請問有人可以指點一下嗎? 在這先謝謝各位了 |
shunaaron
高階會員 發表:13 回覆:94 積分:106 註冊:2006-10-06 發送簡訊給我 |
1.首先印表機名字是指
去控制台新增一台印表機(看要取什麼名字) 並先將要印的紙張選好 2.另一個問題,如以下範例 //以下是以QuickRep為範例 ppint := Printer.Printers.IndexOf('dd'); if ppint <> -1 then begin QuickRep1.PrinterSettings.PrinterIndex := ppint; QuickRep1.Prepare; QuickRep1.Print; end else begin showMessage('找不到印表機'); QuickRep1.Preview; end; ===================引 用 windheartalan 文 章=================== 首先謝謝shunaaron大大的回覆, 但當中還有疑問未解, 所謂的"把印表機名字取如:dd",是指宣告dd為Printer嗎? 比方說是這樣? TPrinter *dd= Printer(); 再者,"選好要Print的紙張大小",我就是這個部份不知道, 請問可否稍微說明詳細些,或是舉個實例,非常感謝~ ===================引 用 shunaaron 文 章=================== 去設一台印表機出來~ 把印表機名字取如:dd 並選好要Print的紙張大小 程式那去uses Printers 在程式式要PRINT時 寫一段 indx := Printer.Printers.IndexOf('dd') ; if indx <> -1 then bgin 再將indx指向你的print end; 這樣就OK了 ===================引 用 windheartalan 文 章=================== 各位大大好,利用Printer()來做列印的功能,小弟已經知道如何利用, 但現在小弟碰到一個問題, 當我列印完一份我要印的東西,使用Printer->EndDoc()後, 都會跳約A4大小的紙張高度後,下一份才會開始印, 也就是說,採用不同於A4格式的紙張列印時,我不知道要如何通知印表機, 根據該紙張格式正確的換頁,或是說有辦法設定紙張的大小? 請問有人可以指點一下嗎? 在這先謝謝各位了
------
程式沒有這麼難 只是還沒打通其中要絕 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |