Die Arbeit und die Feinabstimmung des ITF-14-Barcodes in Delphi / Lazarus

In der Version FastReport VCL 2021.2 wurde ein neuer Barcode ITF-14 hinzugefuegt. Es kommt eine kurze Erinnerung daran, dass ITF-14 (Interleaved Two of Five) ein numerischer Zweibandcode ist, mit anderen Worten ist es ein Code mit hoher Dichte, der nur Zahlen in einer geraden Zahl codieren kann. Jeder dieser Strichcode codiert eine ungerade Zahl mit einer dunklen Linie und eine gerade Zahl mit einem Leerzeichen dazwischen. Um eine ungerade Anzahl von Stellen zu codieren, sollen Sie die am weitesten links stehende (höchstwertige) Stelle mit einer Null auffüllen. Weitere Theorie zu ITF-14 kann der Leser hier lesen.

Vor nicht langer Zeit fanden unsere Benutzer unkritische Fehler, die jedoch manchmal die Verwendung des Barcodes in der Arbeit störten. Die Fixes sind bereits gemeinfrei. Dieser Artikel soll Benutzern helfen, die noch keine Fehler bemerkt haben, und wird auch die Implementierungsfunktionen in unserem Produkt vorstellen.

Es wurde festgestellt, dass unter Umständen falsche Zahlen unter dem Strichcode angezeigt werden konnten. Und auch die Striche gingen unten über die Rahmengrenzen hinaus.

Diese Fehler wurden bereits behoben und wenn Sie ITF-14 in Ihren Projekten verwenden, empfehlen wir Ihnen dringend, FastReport auf die neueste Version zu aktualisieren.

Kommen wir nun zu den Funktionen.

Für diesen Barcode ist der Rahmen obligatorisch, da er in der Spezifikation angegeben ist, sodass es keine Möglichkeit gibt, ihn vollständig zu deaktivieren oder stark zu ändern. Aber Sie können es noch ändern.

Erstens können Sie Seitenlinien deaktivieren, indem Sie die TestLine-Eigenschaft aktivieren.

Zweitens können Sie die Dicke des Inline-Rahmens ändern, indem Sie Rahmen-> Breite ändern. Diese Eigenschaft funktioniert auch, wenn der äußere Rahmen deaktiviert ist.

Optional können Sie mit der Frame-Eigenschaft einen gemeinsamen äußeren Rahmen aktivieren und konfigurieren. Das Prinzip ist genau das gleiche wie bei jedem anderen Objekt im Report, und danach hat der Strichcode 2 Rahmen gleichzeitig und der äußere ist reicher an Gestaltungsmöglichkeiten.

Die Erstellung vom ITF-14 Barcode in Delphi / Lazarus

procedure TForm1.Button1Click(Sender: TObject);
 var bc: TfrxBarcodeView;
begin
 bc := TfrxBarcodeView(frxReport1.FindObject('BarCode1'));
 {Barcoden Typ bestimmen}
 bc.BarType := bcCode_ITF_14;
 {Einen fixierten Wert vom Barcode bestimmen}
 bc.Text := '12345678912345';
 {Ein Masstab der Barcode Darstellung bestimmen}
 bc.Zoom := 2;
 { Wir stellen den Drehwinkel des Barcodes ein. Er kann die Werte 0, 90, 180, 270 annehmen }
 bc.Rotation := 0;
 { Legen Sie fest, ob die Breite des Barcodes abhängig von seinem Inhalt festgelegt werden soll.}
 {Wenn Zoom einen Wert False hat, wird Zoom so adoptiert, dass die Barcodebreite fest bleibt }
 bc.AutoSize := True;
 {Eine Hintegrund Farbe bestimmen}
 bc.Color := clNone;
 {Die Linien Farbe bestimmen}
 bc.ColorBar := clBlack;
 {Bestimmen, wird der Text unten des Barcodes anzeigt oder nicht }
 bc.ShowText := True;
 {Die Breite vom innen Rahmen bestimmen }
 bc.Frame.Width := 3;
 { Außenrahmen Eigenschaften bestimmen }
 { Wir stellen die Anzeige von Außenrahmen von allen Seiten ein }
 bc.Frame.Typ := [ftLeft, ftRight, ftTop, ftBottom];
 {Die Breite vom linken Rahmen bestimmen}
 bc.Frame.LeftLine.Width := 5;
 {Die Farbe vom linken Rahmen bestimmen}
 bc.Frame.LeftLine.Color := clRed;
 {Den Style vom linken Rahmen bestimmen}
 bc.Frame.LeftLine.Style := fsDashDotDot;
 {Die Eigenschaften vom linken Rahmen in den Eigenschaften vom rechten Rahmen kopieren}
 bc.Frame.RightLine.Assign(bc.Frame.LeftLine);
 {Die Eigenschaften vom linken Rahmen in den Eigenschaften vom oberen Rahmen kopieren }
 bc.Frame.TopLine.Assign(bc.Frame.LeftLine);
 { Die Eigenschaften vom linken Rahmen in den Eigenschaften vom unteren Rahmen kopieren}
 bc.Frame.BottomLine.Assign(bc.Frame.LeftLine);
 frxReport1.ShowReport();
end;
 

ITF-14 ist zweifellos einer der am häufigsten verwendeten Barcodes. Bei den Fehlern oder Fragen können Sie uns an Support schreiben.