windows 2000 下如何自定义纸张大小?
解决方案 »
- 通过ODAC调用Oracle存储过程,出问题了
- 一个关于DBCHART的问题请教
- 在Edit的右键编辑菜单中,如果Edit.text没有被选中的文本,'复制'选项就应该是不可用的(灰色).请教要怎样做呢?
- 我现在有一个父窗口(mainwindow),和4个子窗口,子窗口名为,form1,form2,form3,form4,同时子窗口中都有一个涵数formok(str:string),现在
- 紧急求助,请教调试程序高手(200分)
- 有关存储过程的问题?
- 那位高手知道在那下载这几本书啊?
- 问题?
- 在主窗体的Panel中显示另一个窗体,用setparent函数的问题??
- 关于字符串一难题
- 关于TDBGrid的一个问题,多谢了
- 关于ClientDataSet的问题。
本人要在windows2000下开发一个票据打印模块,票据的类型有十几种,尺寸是五花八门,各式各样。因此为了用户使用上的方便,必须在打印时根据当前所打印的票据尺寸动态定义一个打印机纸张类型,打印完后再恢复原来设置。
(不要对我说向打印机发控制码!!)
begin
for J := Default to Custom do
begin
if cQRPaperTranslate[J] = DCResult[I] then
begin
FPaperSizes[J] := true;
break;
end
end
end;
FPaperSizes[Custom] := true; //强行将字定义纸张赋为true
这段代码是在qurpntr.pas的4654行左右 版本2.0
3.6版本的行数是2168左右,不过3.6版本的已经自动加上了这行加上以后,在NT下预览可以,但是打印还是不行,不知道是否是驱动的问题。
以上程序在delphi5+winnt/win2000下编译通过
是否要用API,如何实现?