Ver Mensaje Individual
  #2  
Antiguo 13-07-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Aquí está la lista completa de códigos Commands in Code Order, de la impresora. Y, según este documento del fabricante, deberías hacer algo similar a este código:
Código Delphi [-]
...
implementation

uses Printers;

procedure CutPage;
var
  prn: TextFile;
begin
  Printer.PrinterIndex := Printer.Printers.IndexOf('Epson Tm-t88v'); //(1)
  AssignPrn(prn);
  try
    Rewrite(prn);  // Reset ??
    Writeln(prn, #29#86#48); //(2)
    CloseFile(prn);
  except
    on E : Exception do
     ShowMessage(E.Message);
  end;
end;
...
(1) Deberá ser exáctamente el nombre con que figure la impresora en la lista de las mismas.
(2) Prueba el último valor con los indicados en el último enlace.

Lamento no poder probar la funcionalidad del código ya que no dispongo de esa impresora, pero espero te sirva de guía.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita