EAN13 Font auf graphics g erzeugt Monospaces

[amasingh]

Hallo zusammen,

ich habe ein Programm zum drucken von Barcodes geschrieben.
Leider erzeugt die verwendete Schrift bei mir Abstände zwischen den Zeichen die dort nicht sein dürften.
Es werden einfach alle Zeichen gleich breit gemacht - doch manche dürfen nicht so breit sein.

Hier habe ich die Schrift her:
Stuff here!: Creating high quality EAN-13 barcodes for free with Microsoft Excel, Word

So setze ich Sie:

Font font = new Font("Code EAN13", Font.TRUETYPE_FONT, 30);
g.setFont(font);

Es müsste sowas wie "non-monospace" oder so geben.

Vielleicht weiß ja jemand was man machen könnte. Schonmal vielen Dank!

 

[OnDemand]

Monospace ist doch wie courier oder? da ist jedes Zeichen gleich breit
[EDIT]
Nimm doch mal sans serif[/EDIT]

 

[amasingh]

Genau - monospace lässt alle Zeichen eben gleichen Platz verbrauchen.
Die Schrift scheint das aber nur bei Java zu machen - in Word zb nicht.

Du meinst sans serif anstatt der ean13 Schrift nutzen

[EDIT]Hat keiner ne Ahnung?[/EDIT]

 

[Pentalon]

Dem ganzen ist auch ein Excel Worksheet beigefügt, dass aus einer 12-Stelligen Zahl einen EAN13 Code macht.
Der Quellcode des VB Programmes ist da auch dabei:

Public Function ean13$(chaine$)
  'V 1.0
  'Paramètres : une chaine de 12 chiffres
  'Retour : * une chaine qui, affichée avec la police EAN13.TTF, donne le code barre
  '         * une chaine vide si paramètre fourni incorrect
  Dim i%, checksum%, first%, CodeBarre$, tableA As Boolean
  ean13$ = ""
  'Vérifier qu'il y a 12 caractères
  If Len(chaine$) = 12 Then
    'Et que ce sont bien des chiffres
    For i% = 1 To 12
      If Asc(Mid$(chaine$, i%, 1)) < 48 Or Asc(Mid$(chaine$, i%, 1)) > 57 Then
        i% = 0
        Exit For
      End If
    Next
    If i% = 13 Then
      'Calcul de la clé de contrôle
      For i% = 2 To 12 Step 2
        checksum% = checksum% + Val(Mid$(chaine$, i%, 1))
      Next
      checksum% = checksum% * 3
      For i% = 1 To 11 Step 2
        checksum% = checksum% + Val(Mid$(chaine$, i%, 1))
      Next
      chaine$ = chaine$ & (10 - checksum% Mod 10) Mod 10
      'Le premier chiffre est pris tel quel, le deuxième vient de la table A
      CodeBarre$ = Left$(chaine$, 1) & Chr$(65 + Val(Mid$(chaine$, 2, 1)))
      first% = Val(Left$(chaine$, 1))
      For i% = 3 To 7
        tableA = False
         Select Case i%
         Case 3
           Select Case first%
           Case 0 To 3
             tableA = True
           End Select
         Case 4
           Select Case first%
           Case 0, 4, 7, 8
             tableA = True
           End Select
         Case 5
           Select Case first%
           Case 0, 1, 4, 5, 9
             tableA = True
           End Select
         Case 6
           Select Case first%
           Case 0, 2, 5, 6, 7
             tableA = True
           End Select
         Case 7
           Select Case first%
           Case 0, 3, 6, 8, 9
             tableA = True
           End Select
         End Select
       If tableA Then
         CodeBarre$ = CodeBarre$ & Chr$(65 + Val(Mid$(chaine$, i%, 1)))
       Else
         CodeBarre$ = CodeBarre$ & Chr$(75 + Val(Mid$(chaine$, i%, 1)))
       End If
     Next
      CodeBarre$ = CodeBarre$ & "*"   'Ajout séparateur central
      For i% = 8 To 13
        CodeBarre$ = CodeBarre$ & Chr$(97 + Val(Mid$(chaine$, i%, 1)))
      Next
      CodeBarre$ = CodeBarre$ & "+"   'Ajout de la marque de fin
      ean13$ = CodeBarre$
    End If
  End If
End Function

Pentalon

 

[amasingh]

Danke für den Hinweis - das passt nur leider garnicht zum Topic
Der von dir gepostete Code erzeugt aus der EAN die entsprechenden Zeichen damit man die Schrift korrekt nutzen kann - das habe ich aber schon längst umgesetzt.

Problem ist einfach wenn ich die Schrift auf ein graphics Object zeichne, dass zwischen den einzelnen Zeichen viel zu große Abstände gelassen werden, nur bei breiteren Zeichen ist der Abstand nicht vorhanden (Java macht einfach alle Zeichen gleich breit)

 

[OnDemand]

Wo denn eigentlich in nem applet oder wo?

 

[amasingh]

Zum drucken - kein Applet oder Frame oder sonstwas.

 

[Spacerat]

1. Einen Font mit der Konstante Font.TRUETYPE_FONT zu instanzieren ist Käse.
2. Der von dir gewählte Konstruktor erkennt nur installierte System-Fonts. Willst du 'ne anwendungsspezifische Fontdatei aus einem beliebigen Verzeichnis laden musst du das mit "Font.createFont(int type, File datei)" machen. Dazu ist dann im übrigen auch die von dir verwendete Konstante gedacht.

 

[amasingh]

Zu 1. welche Konstante soll ich stattdessen nehmen?
Zu 2. das ist mir klar - habs schon mit Font.createFont versucht - funktioniert soweit einwandfrei - nur fügt er damit nach wie vor die freien "Bereiche" hinzu. Er macht es aber scheinbar nur mit genau dieser Schrift - mit keiner anderen.

[EDIT]Male nun jedes Barcode Zeichen einzeln. So kann ich den Abstand wenigstens selbst bestimmen - zwar ne extremst unschöne Lösung aber keine Ahnung was ich sonst tun soll. Falls jemand doch noch ne Idee hat - gerne her damit
Denn mit der Lösung kann ich jetzt zB die Schriftgröße des Barcode nicht ändern ohne alle Abstände wieder anzupassen.[/EDIT]

 

[Spacerat]

Also in den von dir verwendeten Konstruktor gehört definitiv eine STYLE-Konstante, also BOLD, PLAIN, ITALIC.
Monospaced (DIALOG) ist Javas Fallback-Font, wenn der angegebene Font nicht gefunden wurde. Wenn die TTF-Datei vorhanden ist und das angegebene Verzeichnis stimmt, sollte der Font auch per createFont geladen werden können.
Alternativ dazu kannst du den Font auch als Systemfont installieren (Anleitungen dazu gibt es im Netz zu häuf) und mit getAvailableFonts (oder war's getFontAvailabe ???:L) nachsehen, ob er Java dann zur Verfügung steht.

 

[amasingh]

Wie gesagt - mit dem Laden des Fonts habe ich keine Probleme Nur damit dass Java die Zeichen als "monospace" behandelt und alle Zeichen so breit macht wie das breiteste Zeichen, welches die Schrift bietet. Doch einige Zeichen sind nur halb so breit und das versteht Java nicht.

 

[Spacerat]

Okay... Ich hab' mir den Font mal besorgt und ähhh... hast du dir den schon mal im Preview oder besser in der Zeichentabelle angesehen? Das ist so ungefähr eine Art "WingDings"-Font. Mit nomalen Buchstaben- oder Zahlenfolgen wird man damit wohl nur eher zufällig 'ne korrekte Anzeige bekommen. Der Zeichentabelle kannst du die Codes für die jeweiligen Zeichen entnehmen, die du in Java als Unicode ('\u00ab' z.B.) verwenden musst, um das gewünschte anzuzeigen.

 

[amasingh]

Das hört sich ja schonmal nach nem funktionierenden Ansatz an
Wo kann ich mir die Zeichentabelle anschauen? Hast du das getestet mit den Unicodes? Verstehe aber nicht wieso man das bei Java so machen muss wenn es denn klappt!?

[EDIT]So - habe es nun getestet - auch mit Unicodes liefert Java nicht das gewünschte Ergebnis. Es wird nach wie vor freier Platz zwischen den Zeichen erzeugt wo keiner sein darf. Sämtliche Schreibprogramme die ich getestet hab machen dies nicht. Scheinbar nur Java (auch HTML macht es korrekt )

g.drawString("\u0030\u0044\u0042\u0041", 10, 10 );

[/EDIT]

 

[Spacerat]

Aber Java nicht... diese Art Wingdings-Fonts (recherchiert: Symbolfonts) nutzen, so wie ich das verstanden habe, eine andere Unicode-Range (z.B. '\u26xx' bis '\u27xx') damit sie sich nicht mit normalen Charachtern beissen. Leider funktioniert das beim EAN13-Font irgendwie nicht. Evtl. muss man erst die korrekte Range suchen.

		Font f;
		try {
			f = Font.createFont(Font.TRUETYPE_FONT, new File("ean13.ttf"));
		} catch(Exception e) {
			f = Font.getFont(Font.MONOSPACED);
		}
		f = f.deriveFont(24.0F);
		List<Integer> g = new ArrayList<>();
		int c = 0;
		for(; c < 0x10000; c++) {
			if(f.canDisplay((char) c)) {
				g.add(c);
			}
		}
		c = 0;
		char[] glyphs = new char[g.size()];
		for(Integer i : g) {
			glyphs[c++] = (char) i.intValue();
		}

"glyphs" enhält nun alle für ean13 gültigen Zeichen (aber frag' mich nicht, wie man die korrekt mapped ).

 

[amasingh]

Werd das direkt mal testen.

[EDIT]Geil Wäre ich nie drauf gekommen - aber mit den "glyphs" geht es - dann behandelt Java es bei der Ausgabe scheinbar nicht mehr als normale Zeichen.
Jetzt ist wirklich nur noch die Frage nach dem Mapping. Aktuell gebe ich einfach alle hintereinander aus zum testen.
Aber schon mal VIELEN Dank!!!

Font f = new Font(eanFont, Font.TRUETYPE_FONT, 36);
        f = f.deriveFont(24.0F);
        ArrayList<Integer> myList = new ArrayList<>();
        int c = 0;
        for(; c < 0x10000; c++) {
            if(f.canDisplay((char) c)) {
                myList.add(c);
            }
        }
        c = 0;
        char[] glyphs = new char[myList.size()];
        for(Integer i : myList) {
            glyphs[c++] = (char) i.intValue();
        }
        g.drawString(new String(glyphs), x-200, y + 21);

[/EDIT]