barcode mit barcode.pas

[MiniMax]

Hi,
der Thread is zwar schon älter, aber wen's Interresiert:
mit
Fbarcode.DrawText(printer.canvas); schreibst du meiner Ansicht nach nur den Text nicht den Barcode.

Mit der Property
 property ShowText:TBarcodeOption read FShowText write SetShowText default bcoNone; kannst du bestimmen ob er beim Zeichnen des Codes auch den Text mitschreiben soll! Daher Denke ich, muss du vor dem Aufruf vom Malen noch folgendes Schreiben:
FBarcode.ShowText:=bcoCode oder
FBarcode.ShowText:=bcoTyp oder
FBarcode.ShowText:=bcoBoth
Ich hoffe ich konnte die Helfen!