Kody kreskowe w Delphi 10.3.3

0

Powitać,
Szukam, i szukam i znaleźć nie mogę. Potrzebuję generować w locie kody kreskowe EAN13, wstawiać je do zmiennych TBitmap, ażeby później wrzucić na PDF. Pomóżcie, jak to zrobić? Podpowiedzcie coś. Do PDF używam SynPdf.

4
  1. Bitmapa się nie nadaje, przy skalowaniu się rozmywa. Chyba, że w PDF można ustawić algorytm skalowania dla poszczególnych bitmap.
  2. W PDF najlepiej kod kreskowy zapisać wektorowo. Prostokąty o odpowiednich rozmiarach z odpowiednimi odstępami między nimi.
  3. Żeby nie rysować kresek "ręcznie", najlepiej zakodować swoje dane dla odpowiedniej czcionki, która zamiast literek ma kody kreskowe poszczególnych znaków. Ja w swoich projektach korzystałem z czcionek od tego autora: https://grandzebu.net/informatique/codbar-en/ean13.htm - link do pobrania czcionki jest obok tabelki ze znakami.
0

masz tam FastReport, który załatwi wszystko za Ciebie, łącznie z generowaniem PDFa

1

Do EAN13 to są zwyczajne fonty i nie trzeba nic kombinować.
Np.: https://www.fontpalace.com/font-download/EAN-13/ ( pierwsze lepsze które znalazłem ... być może warto posprawdzać jeszcze inne jest tego w sieci mnóstwo ).

Czyli bierzesz fonta piszesz nimi po canvasie a nastęnie canvasa zgrywasz do BMP ( choć to słaby pomysł jak kolega wyżej napisał ).

Co innego gdybyś chciał generować bardziej złożone kody to wtedy są gotowe biblioteki.

0

Dzięki wszystkim za podpowiedzi. Działa z fontami. Jeszcze raz dziękuję. Aczkolwiek zainteresuję się tematem FastReporta.

1 użytkowników online, w tym zalogowanych: 0, gości: 1