التعامل مع ملفات ال pdf من خلال دلفي

[issamdnn]

دعونا نرى كيفية إضهار ملفات الأكروبات(.pdf) ضمن تطبيقات دلفي . كل ما تحتاجه هو (Acrobat ActiveX control ) أي ملف (pdf.ocx and pdf.tlb) والذي يمكنك الحصول عليه مجاناً من موقع adobe
وخطوات العمل كما يلي:
1- إبداً دلفي وإختار Component ثم Import ActiveX Control
2- أبحث عن 'Acrobat Control for ActiveX (Version x.x) ثم أضغط على زر Install
3-قم بإختيار مسار منصة العناصر التي سستوضع عليه المكتبة المختارة.
4-ربما من الأفضل أن تترك خيار الاكتف أكس فعال ثم قم بالضغط على Install
5- إختار الحزمة حيث سيتم تنصيب العنصر الجديد أو قم بإنشاء حزمة جديدة تحت أسم Tpdf control
6- قم بالضغط بعد ذلك على OK
7- سيقوم دلفي بتنبيهك فيما إذا كنت تريد إعادة البناء للباكيج أو تعديله.
8- بعد أن يتم ترجمة الباكج سيظهر دلفي رسالة تفيد بأن عنصر جديد أسمه tpdf تم تسجيله وبأنه أصبح جزاً من ال VCL
9- قم بإغلاق نافذة تفاصيل الباكيج لكي تسمح لدلفي بحفظ التغييرات عليها.
10-العنصر الأن فعال في صفحة ال ActiveX
11-أختر الأن العنصر tpdf الذي قمت بوضعه على الفورم.
12 - بإستخدام مفتش الكائنات الموجود في دلفي قم بجعل خاصية src تحمل أسم ملف ال pdf الموجود على جهازك .
الأن كل ما عليك فعله هو تغيير حجم العنصر وقراءة ملف ال PDF ضمن تطبيقك.


ملاحظة : إذا لم يكن لديك ملف ال ocx قمت بوضعه في المرفقات..

مع التوفيق للجميع.

[AL-MOB4RM3G]

السلام عليكم

الآخ issamdnn بارك الله لك على هذا الموضوع,
جزاك الله خيرا,,

لم اجرب المكون المذكور لكن,
اتذكر انني استخمد مكون اسمه AcroPDF او شئ من هذا,,
لكن عيب ذلك المكون هو ان عند الزبون يجب ان يكون برنامج ال Acrobat منصّب,

فهل لهذا المكون نفس العيب ؟
ام ممكن الإستغنآء عن الأكروبات ريدر مع هذا المكون بالنسبة للزبون ؟

بارك الله لكم

[issamdnn]

أخي العزيز شكراً على الرد..

وأما فيما يتعلق بسؤالك
ممكن الإستغنآء عن الأكروبات ريدر مع هذا المكون بالنسبة للزبون

للأسف ضنك في محله لا يمكن إستخدام العنصر السابق إذا لم يتم تنصيب الأكروبات ريدر على جهاز الزبون.

كما أن المكتبة نفسها لن تظهر في نافذة Import activeX إذا لم يتم تنصيبه

وفقك الله و زادك من علمه.

[AL-MOB4RM3G]

طيب جزاك الله خيرا اخي الكريم,,

سؤآل آخر, هل هذا شئ عام مع كل ال activeX ؟

يعني عندما اود استخدام activeX فعادة احتاج الى تنصيب البرنامج الأصلي حتى استطيع اعمل له امبورت,,

هل يعني هذا ان كل ال activeX الزبون يحتاج الى تنصيب البرنامج الأصلي ؟

بارك الله لكم

[kachwahed]

هل يعني هذا ان كل ال activeX الزبون يحتاج الى تنصيب البرنامج الأصلي ؟
طبعا فهي مكونات مشتركة في النظام إن صح التعبير، أنظر أيضا:
OLE / COM / DCOM / Automation / ActiveX - Delphi knowledge base (http://delphi.about.com/od/comoleactivex/OLE_COM_DCOM_Automation_ActiveX_Delphi_knowledge_b ase.htm)
يعني المبرمج في خيارين:
- يخبر المستعمل بضرورة تثبيت البرنامج المحمل بالـ OCX (أقصد ActiveX) الضروري.
- تضمين الملفات الضرورية مع مصادر البرنامج (Resources) وتثبيتها مع تثبيته.
ربما يمكن إضافة بطريقة ما توزيع البرنامج مع الملفات الضرورية واستدعاؤها عند كل إقلاع.

[anasdrak]

شكرا أخي
ولكن هنالك طريقة أخرى
لأن هذه الطريقة تستلزم تنصيب الأكروبات في أجهزة الزبائن

[B.M.AbdelAziZ]

هذه الطريقة تستلزم تنصيب الأكروبات في أجهزة الزبائن

يمكن استخدام احد البرامج البديلة التي يمكنها عرض ملفات PDF
اذكر على سبيل المثال اشهر اثنين FoxIt Reader / Sumatra PDF

بديل اخر هو استخدام مكونات تدعم PDF بدلفي وعرضها من البرنامج
اذكر على سبيل المثال فقط مكونات gnostice و مكونات llPDFLib راجع
http://www.delphi4arab.com/forum/showthread.php?t=2179
وبالتوفيق

[فاروق89]

السلام عليكم

الاخ issamdnn بارك الله فيك

جاري التجربة...

[karamofweb]

السلام عليكم،
لي فكرة صغيرة، وهي كالآتي
البحث عن الملفات الخاصة بالـadobe التي يحتاجها المكون و وضعها في حزمة ملفات تنصب مع تنصيب البرنامج وبذلك نتمكن من فتح ملفات الـ PDF دون تثبيبت adobe reader
في انتظار ردردكم

[قديم الشوق]

جربت مكتبة FoxIt Reader

والتجربة بالمرفقات

عساها ماتحتاج المكتبه

[قديم الشوق]

جربتها بجهاز ثاني ماهو مثبت عليه
FoxIt Reader لم يعمل

[karamofweb]

شكرا على المجهود لكن البرنامج غير شغال

[B.M.AbdelAziZ]

السلام عليكم
جربتها بجهاز ثاني ماهو مثبت عليه
عند استخدام ocx دائما تحقق من وجوده،
قم بتثبيته اثناء تثبيت برنامجك او مع أول تنفيذ

[قديم الشوق]

وعليكم السلام ورحمة الله وبركاته
حاولت اربط ocx مع البرنامج ولم تنجح
الملفات كاملة أن شاء الله بالمرفقات

[kachwahed]

OCX ينبغي تسجيله قبل استخدامه
uses
OLECtl;

var
OCXHandle: THandle;
RegFunc: TDllRegisterServer;
begin
OCXHandle := LoadLibrary ('...custom.ocx');
RegFunc := GetProcAddress (OCXHandle, 'DllRegisterServer');
if RegFunc <> 0 then
ShowMessage('Error!');
FreeLibrary (OCXHandle);
end;

أو من سطر الأوامر:
WinExec(PChar('regsvr32 /s custom.ocx'), SW_HIDE);

[قديم الشوق]

هل جربت المكتبه و عملت عندك ؟
وشكراً

[B.M.AbdelAziZ]

قديم الشوق حمل Foxit Reader SDK ActiveX
به المكتبة + امثلة عن استخدامها بدلفي ولغات اخرى

[قديم الشوق]

الله يجزاك خير ابو عبد العزيز شيكت على موقعها

والظاهر لي انها ليست مجانيه :)

دوم تسعفنا الله يطول عمرك على طاعته

ماتلاحظ انقلب الموضوع لي :)

[B.M.AbdelAziZ]

والظاهر لي انها ليست مجانيه
دائما ابحث بقسم الروابط.
انقلب الموضوع لي
معك الى ان تتمكن من الموضوع وربما تكتب درس عنه ينشر هنا او بعدد من اعداد المجلة

[yosefyosef]

ما هي الملفات الملفات الخاصة بالـadobe التي يحتاجها المكون
عندما قلتم البحث عن الملفات الخاصة بالـadobe التي يحتاجها المكون و وضعها في حزمة ملفات تنصب مع تنصيب البرنامج وبذلك نتمكن من فتح ملفات الـ PDF دون تثبيبت adobe reader

[المحجوب]

يا اخوان لدي حل سهل ربما يخدمكم في اعمالكم القادمة

اولاً لابد ان يتوفر في جهازك برنامج Adobe Reader اي اصدار وتحميلة مجاني وكذلك اجهزة مستخدمي البرنامج
واعتقد ان كل الاجهزة لا تخلى من هذا البرنامج وهو خاص بفتح ملفات pdf

طريقة عمل هذه الخاصية في مشروعك :

1- اسحب اضافة WebBrowser1
2- اسحب OpenDialog1 << بدون وضع اي فلتر فيه

ثم اكتب الكود التالي مثل اي صفحة انترنت او ضع الامدادت مباشرة او ضع له زر للتشغيل
هذا رابط مباشر للتجربة
http://shrani.si/f/3e/cb/28vwQNnN/quran.pdf
هذا الكود مع الرابط
WebBrowser1.Navigate('http://shrani.si/f/3e/cb/28vwQNnN/quran.pdf');

الطريقة مجربة وشغال 100% معي

[hassankill]

نشكركم جميعاً وجزاكم الله الف الف خير على كل معلومه