自定义纸张打印，字体变长的问题 |
|
尚未結案
|
|
gqlv
一般會員   發表：18 回覆：10 積分：5 註冊：2003-07-23 發送簡訊給我 |
我开发了一个程序，需要自定义打印，在预览是看到时正确的，但打印时就不对了，字体变长，走纸也不正确。
具体情况是这样的：
系统是 2000 pro,
delphi 7 开发，
quickreport 4.03,
打印机：旧的epson lq-570 ，
打印机驱动用２０００系统带的lq-570驱动,
打印纸：２４１ｍｍ＊１３８ｍｍ连续纸
自定义纸张大小是241MM*138MM.
我在打印机服务器属性里新建了纸张类型:"送货单",大小24.10CM*13.80ＣＭ
并在打印首选项里选择了纸张是"送货单"．
在程序里这样写：
procedure Tfrm_main.btn_printClick(Sender: TObject);
begin
Report.page.PaperSize:=Custom; //先設
Report.page.Length:=138;
Report.page.Width:=241;
Report.Page.paperSize:=Default; //套表或自定尺寸一定為Default
report.Preview;
end; 预览是看到的纸张大小应该是２４１＊１３８，
但打印时字体确变大变长了，走纸也不对．
检查了一下，个人认为打印机还是以a4纸打印走纸的，因为
Report.page.Length:=２４０左右字体好像就正常了．
|
|
sl@cableplus.com.cn
高階會員   發表：168 回覆：359 積分：130 註冊：2004-03-26 發送簡訊給我 |
|
|
gqlv
一般會員 發表：18 回覆：10 積分：5 註冊：2003-07-23 發送簡訊給我 |
發表時間：2004-07-05 10:02:16
IP:219.128.xxx.xxx 未訂閱
系統時間：2024-05-07 15:24:11
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |