如何在quickreport中用A4纸打两张票据

Question

设置quickrep中的column为2，试一试，还有你的意思不太清楚

Answer 1

老大，我是说A4纸是210*297，我的一个票据的大小是210*148，也就是A4的一半高度，你讲的
COLUMN是分成两列，我想分成两行，每一行各占一半。拜托高人点拨。如在深圳，我可以请你吃顿饭。上海、北京的朋友折现20分。[email protected]

Answer 2

如果用quickrep做的话，意味着你要每一次打两张票。这种情况下，直接使用quickrep的titleband，然后在其中按你要求画好表格。在打印的时候控制数据出现即可。也就是你自己规定数据打印在表格的那一个地方（在你要打印的地方放qrlabel控件，需要打印时赋值给他）if (recono mod 2) <> 0 then {奇数条记录}
begin
  qrlabel11.caption := '...'
  qrlabel12.caption := '...'
  qrlabel13.caption := '...'
  qrlabel14.caption := '...'
end else {偶数条记录}
begin
  qrlabel21.caption := '...'
  qrlabel22.caption := '...'
  qrlabel23.caption := '...'
  qrlabel24.caption := '...'
end;
把两个表格中的qrlabel控件按照所属表格分组吧。

Answer 3

我认为cobi,kplchx说的有道理（但不一定从根本上解决问题），因为在delphi中，quickreport的设置与系统有关，不幸的是我的程序是运行在win2000上，所以在系统设置里根本看不到自定义纸张，所以我准备换台win98试一试，有最新结果我会向大家通报，我的这个问题也是delphi的很大的缺陷，也许老外门就没想到咱中国人.

Answer 4

我没有用过WIN2000，以前在NT4的时候，曾经使用过我上面提到的方法去做自定义大小的报表，没有问题。可能是时代越先进，解决问题的方法也要越先进吧

Answer 5

可以在程序中修改打印机的自定义纸张,但我还不知道如何的象其它如WORD样(在该程序中修改了系统打印机的纸张,但同时又不影响其他程序的打印机设置.)怎做?

Answer 6

老大，在程序中获取用API当前打印机设置，然后再恢复不就得了，我的问题已经搞定了，
实践证明，在蚊2000中不行，而在蚊98中是可以的，KPLCHX兄说的有理。20分不成敬意。