要求大概是这样的:
已经有一个固定格式的票据了,然后当中有些格子里要打内容,比如名字之类的。因为小弟我从来没做过打印这方面的程序,现在请教各位,用Delphi开发的话,应该怎么做?
使用什么VCL,或者直接操作打印机?
已经有一个固定格式的票据了,然后当中有些格子里要打内容,比如名字之类的。因为小弟我从来没做过打印这方面的程序,现在请教各位,用Delphi开发的话,应该怎么做?
使用什么VCL,或者直接操作打印机?
解决方案 »
- ACCESS查询如何限制只显示列值大的一列?
- 在操作ACCESS数据为时弹出这条异常错误是什么意思?谢谢各位大侠了。。。。
- 菜鸟问题
- 生成lib文件
- 一个错误提示
- 如何使用API中的ping功能?最好给个例子!谢谢
- 如何在delphic中实现二进制的储存?
- 我有一个控件的源代码,为何我在DELPHI6中加入了,却用不了控件的方法。大家帮我看看。
- 真心请教 谁能告诉我.h文件转为.pas的方法、步骤和注意事项
- 各位老大,快帮我!如何将程序生成的文件用默认(outlook express)邮件系统以附件形式发送,在程序中自动写入地址,标题,并能自动加上附件发出?(20分全送))
- 请问:如何把这段字符从网页中提取
- 高分求教,一个结构变量不能使用,提示:
Function TForm1.FormCmtoPix(Len:integer):integer; //换算
var
DC:HDC;
dpiSize:integer;
begin
DC:=GetDC(self.Handle);
dpiSize:=GetDeviceCaps(dc,LOGPIXELSX);
Result:=Round(len*(dpisize/25.4));
end;
Function TForm1.FormCmtoPiy(Len:integer):integer;
var
DC:HDC;
dpiSize:integer;
begin
DC:=GetDC(self.Handle);
dpiSize:=GetDeviceCaps(dc,LOGPIXELSY);
Result:=Round(len*(dpisize/25.4));
end;
能给个Demo吗?
printer.Canvas.TextOut(0,0,'sss');
//下一页
Printer.NewPage;
Printer.Canvas.TextOut(0,0,'kkkk');
Printer.EndDoc;多试几次,把定位点找准就行了。
我用直接操作Printer的方式了。
还行,下次再试试报表控件的方式。