I don't know if it's possible to mix window printing and raw printing. Maybe you will have a luck and find solution
![Wink ;-)](./images/smilies/icon_e_wink.gif)
Moderator: Rathinagiri
Code: Select all
@ 50, 20 PRINT BarEAN13(eancode) FONT "CODE EAN13" SIZE 30
Procedure BarEAN13(Cnumero)
Declare Tab1CodBar[10]
Tab1CodBar[ 1] := "-AAAAAA"
Tab1CodBar[ 2] := "-AABABB"
Tab1CodBar[ 3] := "-AABBAB"
Tab1CodBar[ 4] := "-AABBBA"
Tab1CodBar[ 5] := "-ABAABB"
Tab1CodBar[ 6] := "-ABBAAB"
Tab1CodBar[ 7] := "-ABBBAA"
Tab1CodBar[ 8] := "-ABABAB"
Tab1CodBar[ 9] := "-ABABBA"
Tab1CodBar[10] := "-ABBABA"
LitCD := ""
** Primer dígito
LitCD := left(Cnumero,1)
** Dígitos del 2 al 7
For HH = 2 to 7
LetraTabla := substr(Tab1CodBar[val(left(Cnumero,1))+1],HH,1)
if LetraTabla = "A"
LitCD += chr( 65 + val(substr(Cnumero,HH,1)) )
else // "B"
LitCD += chr( 75 + val(substr(Cnumero,HH,1)) )
endif
Next
LitCd += "*"
** Dígitos del 8 al 13
For HH = 8 to 13
LitCD += chr( 97 + val(substr(Cnumero,HH,1)) )
Next
LitCD += "+"
Return LitCD
This setting exists also on Zebra TLP2844 but unfortunately it makes no difference to the final outcome of the barcode image printed.radohabjan wrote:Hello again,
I found out also the other solution, which is in printer driver graphics settings.
In my case : printer Xprinter has graphic setting Dithering, which must be None. Then is picture realy perfect (just black white).
br Rado
The only problem that exists is only when printing small barcodes(size 6 and less, from your program). The bigger barcodes are ok.mol wrote:When I'm printing labels on my Zebra, barcode looks OK and there is no problem with scanner.
I'm curious what's going on with this...
Code: Select all
cValue := "1234567890123"
@ 10,40 PRINT cValue FONT "EAN13_90" SIZE 16 BOLD // created by my
Code: Select all
Function Print_page2()
SELECT PRINTER cPrinter ;
ORIENTATION PRINTER_ORIENT_PORTRAIT ;
PAPERSIZE PRINTER_PAPER_USER PAPERLENGTH 45 PAPERWIDTH 70;
QUALITY PRINTER_RES_MEDIUM ;
PREVIEW
START PRINTDOC
START PRINTPAGE
@ 1,1 PRINT "Print with Eltron Barcode Fonts " FONT "Courier New" SIZE 10 BOLD
@ 10,1 PRINT "my EAN 13 Font " FONT "ARIEL" SIZE 10
@ 10,40 PRINT "1234567890123" FONT "EAN13_hmg" SIZE 16 BOLD // created by my
@ 20,1 PRINT "my EAN 39 Font " FONT "ARIEL" SIZE 10
@ 20,40 PRINT "001234" FONT "Code39" SIZE 16 BOLD // already exist
@ 30,1 PRINT "my CODE 128 Font " FONT "ARIEL" SIZE 10
@ 30,40 PRINT "123456" FONT "Code128" SIZE 16 BOLD // already exist
@ 40,1 PRINT "my CODE128 Small Font " FONT "ARIEL" SIZE 10
@ 40,45 PRINT cPELATHSTXT5 FONT "CODE128MIN" SIZE 12 BOLD // created by my
END PRINTPAGE
END PRINTDOC