急！关于票据打印的问题。

Question

要求大概是这样的：
已经有一个固定格式的票据了，然后当中有些格子里要打内容，比如名字之类的。因为小弟我从来没做过打印这方面的程序，现在请教各位，用Delphi开发的话，应该怎么做？
使用什么VCL，或者直接操作打印机？

Answer 1

PsGrid 非常贴切，http://www.puersoft.com/download/grid/psgrid2.8.rar

Answer 2

谢谢楼上的几位，有Demo代码可以参考吗？

Answer 3

http://www.wave12.com/web/SigCon.asp?bCate=50&sCateName=%B9%A6%C4%DC%BD%E9%C9%DC&ID=173&CateName=wsReport4.5

Answer 4

给你一段代码.关键代码.
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;

Answer 5

To sdzeng(大头鸟)，
能给个Demo吗？

Answer 6

Printer.BeginDoc;
printer.Canvas.TextOut(0,0,'sss');
//下一页
Printer.NewPage;
Printer.Canvas.TextOut(0,0,'kkkk');
Printer.EndDoc;多试几次，把定位点找准就行了。

Answer 7

谢谢，各位。
我用直接操作Printer的方式了。
还行，下次再试试报表控件的方式。