Proba con esto
Código Delphi
[-]
Writeln(Impresora, '');
Writeln(Impresora, '');
Writeln(Impresora, '');
Writeln(Impresora, '');
Writeln(Impresora,#27#105);
Los espacios en blancon son para hacer un avance de papel, porque si no te cota antes.
Avisanos cual fue la solución.
Saludos.
Felices fiestas.