DELPHI 如何实现银行存折打印!!!!!!!!!!!　

tw3899 2007-10-26 09:07:02

...全文

320 15 打赏收藏转发到动态举报

写回复

用AI写文章

15 条回复

切换为时间正序

请发表友善的回复…

发表回复

纯冰糖 2007-10-31

打赏
举报

普通针式打印机即可，编程实现套打功能或者使用第三方报表工具。

leoruby 2007-10-31

打赏
举报

精确打印与普通打印一样吗？

hui717 2007-10-29

打赏
举报

普通的打印就行了，有什么不一样的吗？

ffanpeng 2007-10-29

打赏
举报

打印一般用爱普生的1600k驱动

ly_liuyang 2007-10-27

打赏
举报

格式打印,和硬件调整过就很能准确的

ydlchina 2007-10-27

打赏
举报

银行存折的打印，关键是如何确定存折打印的位置，存折都是每页10个记录。在数据库里使用一个字段专门记录位置，打印时找到即可。其它和普通打印一样。

喝口水 2007-10-27

打赏
举报

获取打印机分辨率，再自定义打印可以了

aaronhocn 2007-10-26

打赏
举报

最近我也在做这块的开发。是精确打印发票的。其实很简单的。我已封装好了一个DLL。直接调用。。呵呵。

oushengfen 2007-10-26

打赏
举报

打印就是那么回事吧,按事先规定的格式,自定义的格式进行打印就可以了吧

Printer.PrinterIndex := Printer.PrinterIndex; //不需要设置，使之打印为默认打印机
Printer.GetPrinter(Device, Driver, Port, hDMode);
if hDMode <> 0 then
begin
pDMode := GlobalLock(hDMode);
if pDMode <> nil then
begin
{Set to custom size}
if PaperType=6 then
begin
pDMode^.dmFields := pDMode^.dmFields or DM_PAPERSIZE Or DM_PAPERLENGTH
Or DM_PAPERWIDTH;
pDMode^.dmPaperSize := DMPAPER_USER;
pDMode^.dmPaperWidth := SetIni.CustomDefinPagerWidth;//自定义的大小
pDMode^.dmPaperLength := SetIni.CustomDefinPagerHeight;
end else
begin
pDMode^.dmFields := pDMode^.dmFields or DM_PAPERSIZE;
pDMode^.dmPaperSize := PaperSet[PaperType];
end;
end;
{设定纸张来源}
pDMode^.dmFields := pDMode^.dmFields or DMBIN_MANUAL;
pDMode^.dmDefaultSource := DMBIN_AUTO;
//i := pDMode^.dmLogPixels;
GlobalUnlock(hDMode);
end;
Printer.Orientation := poPortrait;
Printer.Copies := iCopies;
Printer.PrinterIndex := Printer.PrinterIndex;