Do you own a Debenu Quick PDF Library version 7, 8, 9, 10, 11, 12, 13 or iSEDQuickPDF license? Upgrade to Debenu Quick PDF Library 14 today!
Draw text under a barcode |
Post Reply |
Author | |
Rowan
Moderator Group Joined: 10 Jan 09 Status: Offline Points: 398 |
Post Options
Thanks(0)
Posted: 03 Feb 11 at 6:21PM |
Here is some sample code in Delphi that lets you draw text underneath a barcode.
// Add the Helvetica standard font QP.AddStandardFont(4); // Get the width of the barcode with a bar width of 1 unit BarcodeWidth := QP.GetBarcodeWidth(1, '12345', 1); // Draw the barcode QP.DrawBarcode(100, 500, BarcodeWidth, 100, '12345', 1, 0); // Center the text QP.SetTextAlign(1); // Draw the text at 10pt QP.SetTextSize(10); QP.DrawText(100 + BarcodeWidth / 2, 500 - 200 - 5 - QP.GetTextHeight, '12345'); Edited by Rowan - 07 Feb 11 at 8:15PM |
|
Post Reply | |
Tweet
|
Forum Jump | Forum Permissions You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |
Copyright © 2017 Debenu. Debenu Quick PDF Library is a PDF SDK. All rights reserved. About — Contact — Blog — Support — Online Store