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!
Create a One page PDF with a line of text |
Post Reply |
Author | |
ZarkoGajic
Beginner Joined: 18 Mar 09 Location: Croatia Status: Offline Points: 19 |
Post Options
Thanks(0)
Posted: 19 Mar 09 at 6:25AM |
Can someone share some Delphi source code for the next task:
Create a one page PDF document (A4, landscape) with centered text in the middle of the page (horizontal / vertical). Text can be for example "Created with Quick PDF"
-zarko gajic
|
|
-zarko gajic
|
|
deabrew
Newbie Joined: 19 Jan 09 Status: Offline Points: 43 |
Post Options
Thanks(0)
|
procedure TfrmMain.Button1Click(Sender: TObject);
var QP: TQuickPDF0712; begin QP := TQuickPDF0712.Create; try QP.UnlockKey(' key goes here '); // Set the page size of the default document QP.SetPageSize('A4 Landscape'); // Set centered horizontal alignment QP.SetTextAlign(1); // Draw the text centered on the page, the final // 0 parameter is for centered vertical alignment QP.DrawTextBox(0, QP.PageHeight, QP.PageWidth, QP.PageHeight, 'Created with Quick PDF Library', 0); QP.SaveToFile('filename.pdf'); finally QP.Free; end; end; |
|
ZarkoGajic
Beginner Joined: 18 Mar 09 Location: Croatia Status: Offline Points: 19 |
Post Options
Thanks(0)
|
Great, thanks!
|
|
-zarko gajic
|
|
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