Página 1 de 1
Impressora DR700 D-Printer
Enviado: 09 Mar 2010 17:32
por Ricardo Sales Ribeiro
Olá amigos
Boa Noite
Estou mais uma vez precisando de ajuda, meu cliente comprou uma Impressora DR700 D-Printer Termica, para q eu possa imprimir umas comandas ok. Só q nunca trabalhei com essa impressora, e atraves do clipper gostaria de saber como fazer:
Ela vai ser ligada na porta Serial na Com1
Quero saber quais comando para abrir e fechar essa impressora na porta serial, quanto aos comandos de impressão acredito q seja normal como se fosse uma impressora não fiscal, clipper normal, tipo @ 01,01 Say ´Teste´.
nas impressoras paralelas tipo Epson Lx-300 apenas coloco set devi to print e assim vai mas na serial como fazer.
Atenciosamente
Ricardo
Impressora DR700 D-Printer
Enviado: 09 Mar 2010 19:17
por Pablo César
Oi Ricardo, até onde eu sei não dá para imprimir direto na serial assim como fazemos com a LPT1 diretamente. Mas tem uma solução é capturando para LPT1. E de todas as formas eu aconselho sempre gerar um arquivo para impressão, não imprimir diretamente como fazíamos em WIN98. Aconselho você dar uma lida no tópico onde eexplico como fazer: viewtopic.php?f=1&t=5975&p=27183#p27183 . Acho que também existe outra possibilidade, é conseguir um adapatador ou até mesmo confeccionar o cabo serial que transforme para paralela (nunca testei) mas vale a pena conferir este tópico: viewtopic.php?f=1&t=8510&p=47835&hilit=impressora+serial#p47785 abaixo desta mensagem tem a instrução de como fazer cabo serial.
Quanto aos comando da impressora, geralmente é padrão EPSON, mas não conheço essa sua impressora.
Re: Impressora DR700 D-Printer
Enviado: 09 Mar 2010 20:22
por alxsts
Olá!
Acho que para abrir a impressora na porta COM você não terá problema. Certamente a impressora tem códigos de controle para formatação da impressão e você terá que estudar isso no manual da mesma.
Segue um exemplo de impressão em impressora na porta COM (se não me falha a memória, era para impressora Zebra):
Código: Selecionar todos
* ETIQ
*
* etiquetas codigo de barras
*
I_COPIAS = 4
I_INI = 0
I_FIN = 0
I_TAM = 8
C_FOOT = SPACE(30)
C_PORTA = '1'
DO WHILE .T.
CLEAR SCREEN
@ 05,05 TO 20,75
@ 07,07 SAY ' Porta' GET C_PORTA PICT '9' VALID C_PORTA = 1 .OR. C_PORTA = 2
@ 09,07 SAY ' Cópias' GET I_COPIAS PICT '99'
@ 11,07 SAY ' Número inicial' GET I_INI PICT '99999999'
@ 12,07 SAY ' Número final' GET I_FIN PICT '99999999'
@ 13,07 SAY 'Número de dígitos' GET I_TAM PICT '99'
@ 15,07 SAY ' Linha adicional' GET C_FOOT PICT '99999999'
READ
IF LASTKEY() = 27
EXIT
ENDIF
C_COM = 'COM'+C_PORTA
@ 15,07 SAY 'Imprimindo ... '
SET CONSOLE OFF
SET PRINTER TO &C_COM
SET PRINTER ON
FOR I_LOOP = I_INI TO I_FIN
***
*** footer
C_IMP = CHR(2)+'L'+CHR(13)+'H18'+CHR(13)+'D11'+CHR(13)+'PG'+CHR(13)
C_IMP = C_IMP+'12110000000'+'0030'+C_FOOT+CHR(13)
C_IMP = C_IMP+'12110000000'+'0230'+C_FOOT+CHR(13)
C_ETQ = STRZERO(I_LOOP,I_TAM)
***
*** barra |altura (45)
C_IMP = C_IMP+'1d520500015'+'0030'+C_ETQ+CHR(13)
C_IMP = C_IMP+'1d520500015'+'0230'+C_ETQ+CHR(13)
C_HEADER = C_ETQ + ' XX'
*** |tamanho da letra (11)
*** header |margem superior
C_IMP = C_IMP+'12200000070'+'0030'+C_HEADER+CHR(13)
C_IMP = C_IMP+'12200000070'+'0230'+C_HEADER+CHR(13)
C_IMP = C_IMP+'E'+CHR(13)
FOR I_COPIA = 1 TO I_COPIAS
?? C_IMP
NEXT
NEXT
FOR I_LOOP = 1 TO 4
? CHR(2)+'L'+CHR(13)+'H18'+CHR(13)+'D11'+CHR(13)+'PG'+CHR(13)+'E'+CHR(13)
NEXT
SET PRINTER OFF
SET PRINTER TO
SET CONSOLE ON
EXIT
ENDDO
RETURN
eSPERO QUE AJUDE.
Re: Impressora DR700 D-Printer
Enviado: 10 Mar 2010 15:22
por Maurício Elias
Olá. Boa tarde.
Já imprimi em COM , umas droguinas matriciais, assim:
Set Device to Printer
Set Printer to COM1
@ 1,0 say "XXXXXXXXXXXXX"
Set Printer to
Set Device to Screen
Abraços...
_______
Maurício.