Tienes dos posibilidades utilizar cualquier utilidad o componente para hacer informes, como puede ser QuickReport que ya viene con Delphi, FastReport o ReportBuilder.
O utilizar el
Canvas de la impresora:
Código:
Uses Printers
SetPaperSize(2970,2100);
Printer.Canvas.Font.Size:=12;
printer.BeginDoc;
Printer.Canvas.Font.Name:='Arial';
Textout(Columna ,Linea , cCadena);
Printer.EndDoc;
Un Saludo.