Bar code with text surrounded by code.

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Below is example how to draw Bar code with text surrounded by code. (script in AutoIt)
; ----------------------------------------------------------------------------------------------------------------
$oQP.SetOrigin($__QPDF_SORIGIN_TopLeft);
$oQP.SetMeasurementUnits($__QPDF_MUNITS_Milimeters)

; Get the width of the barcode With a bar width of 0,1 mm
Local $iBarcodeWidth = $oQP.GetBarcodeWidth(0.1, $sText, 1);

; Draw the barcode
$oQP.DrawBarcode($iBarcodeLeft, $iBarcodeTop, $iBarcodeWidth, $iBarcodeHeight, $sText, 1, 0);

$oQP.SetTextSize(11);
Local $iTextWidth = $oQP.GetTextWidth($sText)
Local $iTextHeight = $oQP.GetTextHeight()
$oQP.SetFillColor(1, 1, 1);
; Draw White Box
$oQP.DrawBox($iBarcodeLeft + ($iBarcodeWidth - $iTextWidth) / 2, $iBarcodeTop + $iBarcodeHeight - $iTextHeight, $iTextWidth, $iTextHeight, 1)

; Center the text
$oQP.SetTextAlign($__QPDF_TEXTALIGN_Center);

; Draw the text
$oQP.SetTextSize(10);
$oQP.DrawText($iBarcodeLeft + $iBarcodeWidth / 2, $iBarcodeTop + $iBarcodeHeight, $sText);
; ----------------------------------------------------------------------------------------------------------------

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
mLipok Members Profile Find Members Posts Senior Member Joined: 23 Apr 14 Location: Poland, Zabrze Status: Offline Points: 453	Post Options Post Reply Quote mLipok Report Post Thanks(0) Quote Reply Topic: Bar code with text surrounded by code. Posted: 17 May 14 at 10:12AM
	Below is example how to draw Bar code with text surrounded by code. (script in AutoIt) ; ---------------------------------------------------------------------------------------------------------------- $oQP.SetOrigin($__QPDF_SORIGIN_TopLeft); $oQP.SetMeasurementUnits($__QPDF_MUNITS_Milimeters) ; Get the width of the barcode With a bar width of 0,1 mm Local $iBarcodeWidth = $oQP.GetBarcodeWidth(0.1, $sText, 1); ; Draw the barcode $oQP.DrawBarcode($iBarcodeLeft, $iBarcodeTop, $iBarcodeWidth, $iBarcodeHeight, $sText, 1, 0); $oQP.SetTextSize(11); Local $iTextWidth = $oQP.GetTextWidth($sText) Local $iTextHeight = $oQP.GetTextHeight() $oQP.SetFillColor(1, 1, 1); ; Draw White Box $oQP.DrawBox($iBarcodeLeft + ($iBarcodeWidth - $iTextWidth) / 2, $iBarcodeTop + $iBarcodeHeight - $iTextHeight, $iTextWidth, $iTextHeight, 1) ; Center the text $oQP.SetTextAlign($__QPDF_TEXTALIGN_Center); ; Draw the text $oQP.SetTextSize(10); $oQP.DrawText($iBarcodeLeft + $iBarcodeWidth / 2, $iBarcodeTop + $iBarcodeHeight, $sText); ; ----------------------------------------------------------------------------------------------------------------