Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

Postado

eu consegui montar meu conprovante não fiscal tudo certo, mas agora meu cliente

quer que eu imprima uma copia, desse comprovante, vi que na dll da bematechMdb

tem como imprimir, mas numa achei uma forma no ACBrECF, alguem pode me ajudar ??

obrigado

  • Moderadores
Postado

Você pode utilizar o método de impressão de segunda via que funciona para algumas impressoras, ou pode passar a quantidade de vias que deseja imprimir no mesmo método que você já está utilizando.

Qual a forma que está utilizando para imprimir o comprovante, veja que os métodos para comprovantes tem a quantidade de vias que serão impressas, basta informar.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Postado

não consegui entender onde poderia evocar o metodo de copia,

procurei e não achei nada, se puder me ajudar agradeceria muito

estou emitindo o comprovante da seguinte forma:

ACBrECF.AbreNaoFiscal('');

AtualizaMemos;

ACBrECF.RegistraItemNaoFiscal('03', StrToFloatDef(FloatToStr(F_CAIXABANCO.dxDBCurrencyEditTCRVLA.Value),0),'RECEBIMENTO');

ACBrECF.SubtotalizaNaoFiscal(0);

if F_CAIXABANCO.dxDBCurrencyEditTCRDIN.value > 0 then

ACBrECF.EfetuaPagamentoNaoFiscal('01',F_CAIXABANCO.dxDBCurrencyEditTCRDIN.Value,'',false);

if F_CAIXABANCO.dxDBCurrencyEditTCRCHE.value > 0 then

ACBrECF.EfetuaPagamentoNaoFiscal('02',F_CAIXABANCO.dxDBCurrencyEditTCRCHE.Value,'',false);

ACBrECF.FechaNaoFiscal('Nome......: ' + StrLeft(F_CAIXABANCO.DBEditCLINOM.Text,36) + #10 +

'Codigo....: ' + F_CAIXABANCO.dxDBEditTCRCLI.Text + ' Obs: ' + StrLeft(F_CAIXABANCO.dxDBEditTCROB1.Text,30) + #10 +

'Vencimento: ' + F_CAIXABANCO.dxDBDateEditTCRVCT.Text + ' Docto: ' + F_CAIXABANCO.dxComboTCRNUM.Text + ' Parcela: ' + F_CAIXABANCO.dxDBCurrencyEditTCRORD.Text + #10 +

' ' + ' *** OBRIGADO - VOLTE SEMPRE ***',StrToIntDef('', 0));

AtualizaMemos;

Result := true;

  • Este tópico foi criado há 4886 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.

The popup will be closed in 10 segundos...