Ir para conteúdo
  • Cadastre-se

dev botao

Impressão Sat na Bematech


elrond
  • Este tópico foi criado há 2480 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Bom dia,

Estou com um problema ref a impressao do sat na impressora bematech, sendo que na Epson/Daruma/Elgin estao OK.

Componentes : ACBrSat , ACBrSATExtratoESCPOS e ACBrPosPrinter

Configuração do componente PosPrinter

object ACBrPosPrinter1: TACBrPosPrinter
    Modelo = ppEscBematech
    Porta = 'COM11'
    EspacoEntreLinhas = 5
    ConfigBarras.MostrarCodigo = False
    ConfigBarras.LarguraLinha = 0
    ConfigBarras.Altura = 0
    ConfigBarras.Margem = 0
    ConfigQRCode.Tipo = 2
    ConfigQRCode.LarguraModulo = 4
    ConfigQRCode.ErrorLevel = 0
    LinhasEntreCupons = 0
    ControlePorta = True
    Left = 240
    Top = 160
  end


// teste simples, com o parametro ControlePorta=TRUE
begin
   AcBrSat1.CFE.Clear;
   AcBrSat1.CFE.LoadFromFile('c:\temp\2744.xml');

   ACBrSATExtratoESCPOS1.ImprimeQRCode := True;
   ACBrSATExtratoESCPOS1.PosPrinter := AcbrPosPrinter1;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta := 'COM11';
   ACBrPosPrinter1.Device.Ativar;
   ACBrSAT1.ImprimirExtrato;
end;

// teste - com parametro de ControlePorta=False
begin
   AcBrSat1.CFE.Clear;
   AcBrSat1.CFE.LoadFromFile('c:\temp\2744.xml');

   ACBrSATExtratoESCPOS1.ImprimeQRCode := True;
   ACBrSATExtratoESCPOS1.PosPrinter := AcbrPosPrinter1;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta := 'COM11';
   ACBrPosPrinter1.Device.Ativar;

   ACBrSAT1.ImprimirExtrato;
   ACBrPosPrinter1.Device.Ativo:= False;
end;

Vi no forum que a propriedade "ControlePorta", ele efetua o controle automático de Abrir e Fechar a porta. So que tem um detalhe que esta ocorrendo aqui, ao enviar o comando de ACBrSAT1.ImprimirExtrato; a impressora so imprime um pedaço do cabeçalho. ( por exemplo : "Estabelecimento Fantasia 2" ) e nao imprime mais nada, observei que , ao desativar a propriedade "ControlePorta=false", ele consegue imprimir normal todo o cupom, MAS a porta fica aberta. E para fechar ela deve-se enviar o comando ACBrPosPrinter1.Device.Ativo:= False; ... ou seja, se eu colocar esse comando apos o ImprimirExtrato ele também vai se comportar igual a propriedade "ControlePorta" ... vai imprimir somente um pedaço do cabeçalho.

 

 

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 2480 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.