在报表 quickrep 中 将纸张大小设置为自定义时, 为何无法打印?(200分)

C

chinausa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-09-30

• #1

1. 在报表 quickrep 中 将纸张大小设置为自定义后,进行打印时,打印机只反映性的动一下,
而无法打印出内容? 不知为何? 望各位指教!

我使用的打印机为: LQ-1900 (属于LQ1600系列)

2. 另外我想让 A4 纸横向打印,不知如何实现?

 

H

hqiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-09-30

• #2

1。这问题我也遇上过，delphi先天问题
在windows的打印机中的打印机属性里的纸张设置为你的自定义的大小，立马解决
当然也可以用api来解决！
2。这个问题我可不好意思回答（嘿嘿，在quickrep 里的属性栏里就可以设置啊)

 

Z

zwma

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-09-30

• #3

quickrep 的问题
用hqiang的方法

 

L

LawrenceZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-09-30

• #4

打印机也设定自定义纸张

 

C

chinausa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-01

• #5

hqiang:

1.请问用 Api 函数如何将纸张设置为自定义,用什么函数,是否有代码例子,谢!

2.在quickrep 里的属性栏里我已设置过,但打印机打印时的横向打印与其它横向
打印不一样. (例如:wps2000的横向打印),可否将你设置的方法告诉我,拜谢!

 

C

chinausa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-04

• #6

hqiang:
是否来了

 

E

e.com

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-04

• #7

var
ADevice,ADriver,APort:string;
ADeviceMode:THandle;
DevModeDeviceMode;
Page:TPoint;
begin

DevMode:=GlobalLock(ADeviceMode);
try
DevMode^.dmFields:=DevMode^.dmFields or DM_PaperSize;
DevMode^.dmPaperSize:=？;
DevMode^.dmFields:=DevMode^.dmFields or DM_PaperWidth;
DevMode^.dmPaperWidth:=2090;
DevMode^.dmFields:=DevMode^.dmFields or DM_PaperLength;
DevMode^.dmPaperLength:=?;
finally
GlobalUnlock(ADeviceMode);
end;

 

H

hawkh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-09

• #8

1。打印机也设成自定义。
2。report 中设 landscape

 

H

hqiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-10-09

• #9

不好意思，我国庆出去溜达了，且这个论坛的e_mail的回信我收不到：（
你要问的e.com所得我看了一下好象可以实现，具体的代码我也没写过；）
呵呵！我再补充一点好了
1.delphi中打印相关在winspool中，即要uses winspool
2.e.com的方法中还要加入openprint取得ADeviceMode
3.使用TPrinter来设置会更简单,它包含了大多的打印api功能，在delphi的Printers.pas中有详细的ex,
e.com的就是其中一点

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-11-15

• #10

多人接受答案了。