Page 2 of 3

Re: Simple label designer/manager

Posted: Mon Dec 29, 2014 7:04 pm
by mol
Barcode is really created as image by Zebra library. I've tried with my own way to create barcodes by printing rectangles. It's interesting if barcode created in "rectangles" mode would be more readable? I have too much work at the end of the year to try this, but give me few days to try.

I don't know if it's possible to mix window printing and raw printing. Maybe you will have a luck and find solution ;-) ?

Re: Simple label designer/manager

Posted: Mon Dec 29, 2014 7:06 pm
by mol
My program can print labels on normal printers on pre-cutted sheets. It builds a queue for fill whole page. I'll try to demonstate this in free time.

Regards and thanks for your opinions, guys!

Marek

Re: Simple label designer/manager

Posted: Tue Dec 30, 2014 7:19 pm
by radohabjan
Hello Marek,

Your program is very nice, i saw that sample labels are for slovenian market (cena za KG/L opis).

My solution for perfect EAN code is to print EAN with ttf Font "Code EAN13" ( first install font ). I tested with my new Xprinter XP-360B label printer imported directly from China and works only with Windows drivers. Code made with Picture is really bad.

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

br Rado

Re: Simple label designer/manager

Posted: Tue Dec 30, 2014 9:55 pm
by radohabjan
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

Re: Simple label designer/manager

Posted: Wed Dec 31, 2014 7:37 am
by mol
Thanks for info!

Re: Simple label designer/manager

Posted: Wed Dec 31, 2014 12:04 pm
by quartz565
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
This setting exists also on Zebra TLP2844 but unfortunately it makes no difference to the final outcome of the barcode image printed.
In the attached image you can see the difference between the barcode printing quality of the 2 methods.

Re: Simple label designer/manager

Posted: Wed Dec 31, 2014 12:14 pm
by mol
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...

Re: Simple label designer/manager

Posted: Wed Dec 31, 2014 1:39 pm
by quartz565
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...
The only problem that exists is only when printing small barcodes(size 6 and less, from your program). The bigger barcodes are ok.
I am attaching a new photo with the small barcode to check the difference.

Re: Simple label designer/manager

Posted: Wed Dec 31, 2014 3:27 pm
by mol
Have you found solution for mixing raw and windiws mode printing?

Re: Simple label designer/manager

Posted: Sun Jan 04, 2015 12:41 am
by quartz565
Happy New Year to happy to All !!! :D

mol I found a solution for Windows: this is through the ZEBRA TLP2844 WINDOWS DRIVER (Ver 5.1.07.5146) :!: :!: ..., and in my opinion is very good for windows printing:

The Driver has built nearly all necessary barcode fonts used. You can create new fonts with the properties that you want to use within your program like regular Windows fonts:

E.g. If we want to create a perpendicular (90 °) EAN13 BARCODE with name EAN13_90.

We choose:
download/file.php?mode=view&id=5516


We choose:
download/file.php?mode=view&id=5517


In prg :

Code: Select all

cValue := "1234567890123"  
@ 10,40  PRINT  cValue   FONT  "EAN13_90"  SIZE 16  BOLD  // created  by my

The following label font was created through the driver.
(we can also formulate and downloaded to the printer a ascii file with the printer driver settings. Also we can setup new fonts)

download/file.php?mode=view&id=5518

in prg:

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

So far we have 2 pretty good solutions:
For windows the above, and dos & windows via EPL language: viewtopic.php?f=6&t=4131#p38879

If you try it, tell us your opinion :arrow: