ACIONAR GUILHOTINA EPSON TM-T81 NAO FISCAL

Delphi

03/06/2011

Depois de algumas pedaladas resolvi ligar para a Epson e gentilmente nosso colega Robson nos forneceu os comandos decimais para acionar a guilhotina da epson TM-T81, se pode ser util a voce esta ali a rotina
function CortaPapel:Boolean;varCorte : TStringList ;begin   try     Corte  := TStringList.Create;          Corte.Add(chr(ord(strtoint('29')))+chr(ord(strtoint( '+86')))+chr(ord(strtoint('+01'))));     Corte.SaveToFile('COM1');     finally      Corte.Free;   end;end;
 
Valmor Reblin

Valmor Reblin

Curtidas 0

Respostas

José

José

03/06/2011

Este tópico esta sendo fechado por inatividade. Se necessário, sinalizar para que seja reaberto ou abrir um novo.
GOSTEI 0
POSTAR