10-05-2010, 02:41 PM
مكتبة Synopse PDF والنسخة الأخيرة منها 1.7.2 تم إضافة دعم اللغة العربية بها، المكتبة مفتوحة المصدر ومطورها شخص منفتح جداً للملاحظات.
التحميل:
كمثال لإستخدامها:
المكتوبة مكتوبة بالدلفي 100%، ولا تحتاج لأي ملفات إضافية.
مزيد من المعلومات
كود :
http://blog.synopse.info/
كود :
http://synopse.info/files/pdf/synpdf.zip
كود :
uses
SynPdf;
procedure TForm4.FormCreate(Sender: TObject);
begin
with TPdfDocument.Create do
try
AddPage;
Canvas.SetFont('tahoma',12,[fsBold]);
UseUniscribe := True;
Canvas.TextOut(300,700,'تجربة للغة العربية من داخل دلفي');
Canvas.TextOut(100,680,'English test from Delphi');
SaveToFile('Arabic.pdf');
finally
Free;
end;
end;
المكتوبة مكتوبة بالدلفي 100%، ولا تحتاج لأي ملفات إضافية.
مزيد من المعلومات
كود :
http://www.mnasman.com/blog/?p=171