Simple label designer/manager

HMG Samples and Enhancements

Moderator: Rathinagiri

User avatar
mol
Posts: 3248
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Has thanked: 231 times
Been thanked: 132 times
Contact:

Re: Simple label designer/manager

Post by mol » Mon Dec 29, 2014 7:04 pm

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 ;-) ?

User avatar
mol
Posts: 3248
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Has thanked: 231 times
Been thanked: 132 times
Contact:

Post by mol » Mon Dec 29, 2014 7:06 pm

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

radohabjan
Posts: 96
Joined: Mon Nov 30, 2009 7:17 am
Location: Slovenia
Contact:

Post by radohabjan » Tue Dec 30, 2014 7:19 pm

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

radohabjan
Posts: 96
Joined: Mon Nov 30, 2009 7:17 am
Location: Slovenia
Contact:

Post by radohabjan » Tue Dec 30, 2014 9:55 pm

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


User avatar
quartz565
Posts: 566
Joined: Mon Oct 01, 2012 12:37 pm
Location: Thessaloniki, Greece
Has thanked: 175 times
Been thanked: 20 times
Contact:

Post by quartz565 » Wed Dec 31, 2014 12:04 pm

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.
Attachments
Labels_128.JPG
Labels_128.JPG (154.17 KiB) Viewed 2565 times
Best Regards,
Nikos.

os: Windows Server 2012 - 64
hw: HP Server E5606, 2.13GHz, 8.00 GB - Intel Xeon CPU

User avatar
mol
Posts: 3248
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Has thanked: 231 times
Been thanked: 132 times
Contact:

Post by mol » Wed Dec 31, 2014 12:14 pm

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...

User avatar
quartz565
Posts: 566
Joined: Mon Oct 01, 2012 12:37 pm
Location: Thessaloniki, Greece
Has thanked: 175 times
Been thanked: 20 times
Contact:

Post by quartz565 » Wed Dec 31, 2014 1:39 pm

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.
Attachments
small_label.JPG
small_label.JPG (13.62 KiB) Viewed 2556 times
Best Regards,
Nikos.

os: Windows Server 2012 - 64
hw: HP Server E5606, 2.13GHz, 8.00 GB - Intel Xeon CPU

User avatar
mol
Posts: 3248
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Has thanked: 231 times
Been thanked: 132 times
Contact:

Post by mol » Wed Dec 31, 2014 3:27 pm

Have you found solution for mixing raw and windiws mode printing?

User avatar
quartz565
Posts: 566
Joined: Mon Oct 01, 2012 12:37 pm
Location: Thessaloniki, Greece
Has thanked: 175 times
Been thanked: 20 times
Contact:

Post by quartz565 » Sun Jan 04, 2015 12:41 am

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:
Attachments
img007.jpg
img007.jpg (100.76 KiB) Viewed 2487 times
Eltron_2.PNG
Eltron_2.PNG (29.06 KiB) Viewed 2487 times
Eltron_1.PNG
Eltron_1.PNG (30.05 KiB) Viewed 2487 times
Best Regards,
Nikos.

os: Windows Server 2012 - 64
hw: HP Server E5606, 2.13GHz, 8.00 GB - Intel Xeon CPU

Post Reply