المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
السلام عليكم ورمة الله
اخواني الكرام,, سلام الله عليكم اجمعين,,
كما هو العنوان واضح,, كيف يتم عرض ملفات البي دي اف في برنامجي بارك الله لكم؟
هل هناك مكون لذلك ام طريقة اخرى ؟
شكرا لكم
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
نعم,, نسيت ان اقول انني استخدم دلفي 2009 بارك الله فيكم
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 2,293
المواضيع 157
:
: 81
الإنتساب : Dec 2008
مجرد ActiveX ثبته واستعمله.
إبحث في موضوع Delcode Delphi Exemple ستجد شرح بالصور.
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
kachwahed كتب :مجرد ActiveX ثبته واستعمله.
إبحث في موضوع Delcode Delphi Exemple ستجد شرح بالصور.
بارك الله لك,, تم التثبيت الآن ولله الحمد,,
طيب اخي الكريم,, وآجهتني مشكلة مع هذا المكون,, وهو انه يريد مسار الملف كامل,, فهل من طريقة لعمل غير هذا,, يعني ان يأخذ مسار الملف مبآشرة,,
مثال على ما **** عمله,,
في الحدث onCreate للفورم يعمل لود لملف موجود في نفس مسار الملف التنفيذي و اسمه 1.pdf ;;
هذا هو الكود الذي احاول استخدامه,,
لكن هذا الكود لا ينفع,, يود المسار الكامل,, يعي انطلاقا من ال C:/ او D
بارك الله فيكم جميعا
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 2,293
المواضيع 157
:
: 81
الإنتساب : Dec 2008
إذا كان ملف pdf في نفس مجلد البرنامج فاكتب
PHP كود : acroPdf1.src:= ExtractFilePath(Application.ExeName)+'\1.pdf';
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
kachwahed كتب :إذا كان ملف pdf في نفس مجلد البرنامج فاكتب
PHP كود : acroPdf1.src:= ExtractFilePath(Application.ExeName)+'\1.pdf';
شكرا لك اخي الكريم,, اشكرك كثيرا,, لم تخطر في بالي هذه الفكرة
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
اخوآني الكرآم,, كآرثة بنسبة لي والله المستعان,,
الآن وبعد ان انتهيت من البرنامج الذي اعمله,, و اكملت كل شي الّى ملف الم ساعدة,,
جربت ان انقل البرنامج الى جهاز آخر و النتيجة,,, ---------->>> البرنامج لا يعمل,, :confused:
المهم,, بعد الفحص و التحرّيات,, وتركيز والمتاعب  توصلت على ان المشكلة هي من هذا المكون الذي اضفته,, وهو AcroPDF لعرض ملفات ال PDF في برنامجي,,
على جهازي هو شغّآل تمام.,
لكن ان كان الجهاز لا يوجد به ال Adobe Acrobat لا يمكن فتح البرنمج من الآصل وتأتي رسآلة خطأ وتغلق البرنامج قبل فتحه,,
انا بحآجة الى عرض ملفات ال PDF في برنامجي حتى ولو لم يتم تنصيب برنامج ال Acrobat عىل جهاز الزبون,, فما هو الحلّ بارك الله لكم,,,
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 2,293
المواضيع 157
:
: 81
الإنتساب : Dec 2008
كحل بدائي:
1- تعرض رسالة للمستعمل إذا لم يتم العثور على Acrobat تقول له: This program needs to install Adobe Acrobat Reader وبالتالي يجب عليه تثبيته 
2- أو ترفق Adobe Acrobat Reader مع Package التثبيت.
المشاركات : 778
المواضيع 97
:
: 0
الإنتساب : Nov 2008
kachwahed كتب :كحل بدائي:
1- تعرض رسالة للمستعمل إذا لم يتم العثور على acrobat تقول له: This program needs to install adobe acrobat reader وبالتالي يجب عليه تثبيته :d
2- أو ترفق adobe acrobat reader مع package التثبيت.
طيب اخي,, الفكرة 1 اعجبتني  ,,, لكن كيف ممكن انا ان اعرف ان كان النستخدم عنده الأكروبات ام لا ؟
فرّج همّ المهمومين يا الله
اللهم فك قيد اسرانا و اسرى المسلمين
المشاركات : 2,293
المواضيع 157
:
: 81
الإنتساب : Dec 2008
استخدم التعليمة Try...Except.
وإليك هذه الدالة:
يقوم:
PHP كود : function IsAcrobatInstalled: Boolean; //Adobe Acrobat Reader
var reg: TTntRegistry;
begin Result := false; reg := TTntRegistry.Create(KEY_READ); with reg do begin try RootKey := HKEY_CLASSES_ROOT; if OpenKey('CLSID\{CA8A9780-280D-11CF-A24D-444553540000}', False) then Result := true finally CloseKey; Free end end end;
|