[aarmalo]

Primero tienes que declarar la unidad Printers y Agregar un PrintDialog

Después tendrías que hacer algo como:

Código Delphi [-]
var hPrinter:TPrinter;
begin
  //PrinterSetupDialog1.Execute;
    if PrintDialog1.Execute then
    begin
       hPrinter:=Printer;
       hPrinter.BeginDoc;
       hPrinter.Canvas.TextOut(0,0,Memo1.Text); //Lo que quieras Escribir
       hPrinter.EndDoc;
    end;
end;

Con esto Imprimes, lo otro es ver que más opciones tiene, porque así tal y como lo puse imprime, pero no respeta Parrafos, nunca me había pasado tener que imprimir algo desde Lazarus, pero por algo se empieza .

Se puede habilitar la opción de imprimir a archivo y así te evitas tener que gastar en hojas, y probrar de lleno hasta que quede como quieras.

Voy a buscar algo en la documentación de Lazarus, para ver que encuentro.