program HelloWorld;

{$APPTYPE CONSOLE}

uses

�� SysUtils, Graphics, Classes, HPDFDoc;

�

var

�� HPDF: THotPDF;

�

begin

�� HPDF := THotPDF.Create(nil);

�� try

HPDF.AutoLaunch := true; // سيتم عرض ملف PDF تلقائيًا

������ HPDF.FileName := 'Ellipse.pdf';�����������������������

HPDF.BeginDoc; // إنشاء ملف PDF

HPDF.CurrentPage.Circle( 200, 200, 100 ); // رسم دائرة

HPDF.CurrentPage.Fill; // وتعبئتها

HPDF.EndDoc; // إغلاق ملف PDF

�� finally

������ HPDF.Free;

�� end;

end.