票据打印问题

[jackque]

不知有哪位高手写过票据（支票，进帐单等)的打印程序，主要是定点打印问题,
或者提供这方面的控件则更好。
谢谢。

[e-mail]

[wt_sanlian]

TPinter不好调试,
用TQReport更好!

[hmily1688]

先得到打印机的分辨率，

var PointX, PointY: integer;
PointX := Trunc(GetDeviceCaps(Printer.Handle, LOGPIXELSX) / 25.4);
PointY := Trunc(GetDeviceCaps(Printer.Handle, LOGPIXELSY) / 25.4);

begin
printer.BeginDoc();
printer.Canvas.MoveTo(x*PointX, y*pointy,value);//value为打印内容
;
printer.EndDoc();

end;

[hmily1688]

var PointX, PointY: integer;
PointX := Trunc(GetDeviceCaps(Printer.Handle, LOGPIXELSX) / 25.4);
PointY := Trunc(GetDeviceCaps(Printer.Handle, LOGPIXELSY) / 25.4);

begin
printer.BeginDoc();
printer.Canvas.MoveTo(x*PointX, y*pointy);//value为打印内容
printer.Canvas.Textout(x*PointX, y*pointy,value)
printer.EndDoc();

end;

[lm09]

我是用TPrinter类来作的

[clsfox]

你用TPrinter来做吧，这样会方便一点，我以前用Foxpro2.5的时候打印程序都是这么做的。指定好打印坐标。