program PDFInfo;

{$APPTYPE CONSOLE}

uses

SysUtils,

Graphics,

Classes,

HPDFDoc;

 

var

  HPDF: THotPDF;

 

begin

HPDF:= THotPDF.Create(nil);

try

   HPDF.AutoLaunch := true; // קובץ ה-PDF יוצג באופן אוטומטי

HPDF.ShowInfo := true; // כלול מידע במסמך

   HPDF.FileName := 'Hello world.pdf';      

   HPDF.Author := 'http://www.loslab.com/'; // הגדר מידע על המחבר

   HPDF.Subject := 'HotPDF console information demo'; // הגדר נושא המסמך

   HPDF.Title := 'Information Demo'; // הגדר כותרת המסמך

   HPDF.BeginDoc; // צור קובץ PDF

   HPDF.CurrentPage.TextOut(10, 10, 0, 'Information Demo'); // הדפס טקסט

   HPDF.EndDoc; // סגור קובץ PDF

finally

     HPDF.Free;

end;

end.