Impresora de Punto Puerto Serial
Posted:
Tue Apr 07, 2020 5:08 pm
by jnavas
Saludos
Necesito salida por impresora serial
Recuerdo clipper SET PRINTO TO COM1:
Agradecido por su aporte
Juan Navas
Re: Impresora de Punto Puerto Serial
Posted:
Tue Apr 07, 2020 5:53 pm
by acuellar
Juan
Para: oPrn:=TDosPrn():New( cFilePRN )
Instalar la impresora y compartirla
En el programa usar:
- Code: Select all Expand view
PrintFileRaw( "\\PC\IMPCOMPARTIDA", cFilePRN )
Re: Impresora de Punto Puerto Serial
Posted:
Fri Apr 10, 2020 1:31 pm
by jnavas
Adhemar C
Saludos y Gracias
Puedes publicar codigo mas detallado.
PrintFileRaw( "\\PC\IMPCOMPARTIDA", cFilePRN )
quien es "\\PC\IMPCOMPARTIDA"?
o Sera COM1:
Re: Impresora de Punto Puerto Serial
Posted:
Fri Apr 10, 2020 1:52 pm
by acuellar
Juan
Una vez instalada la impresora en la computadora tiene que compartirla
- Code: Select all Expand view
oPrn:=TDosPrn():New( "C:\LISTADO.TXT" )
PrnSetSize(800,1400)
oprn:command("27","64" )
oprn:Say(1,1,PADC(CHR(27)+"E1"+"Impresión por puerto COM1"+CHR(27)+"E0",49) )
oPrn:Say(3,0,CHR(27)+CHR(105) ) //corte
oPrn:End()
PrintFileRaw( "\\NombrePC\NombreImpCompartida", "C:\LISTADO.TX" )
Re: Impresora de Punto Puerto Serial
Posted:
Sat Apr 11, 2020 4:29 am
by jnavas
aCuellar
Saludos y Gracias.
Probaré.