عرض ملفات pdf في برنامجي,, كيف؟

[AL-MOB4RM3G]

السلام عليكم ورمة الله

اخواني الكرام,, سلام الله عليكم اجمعين,,

كما هو العنوان واضح,, كيف يتم عرض ملفات البي دي اف في برنامجي بارك الله لكم؟

هل هناك مكون لذلك ام طريقة اخرى ؟

شكرا لكم

[AL-MOB4RM3G]

نعم,, نسيت ان اقول انني استخدم دلفي 2009 بارك الله فيكم

[kachwahed]

مجرد ActiveX ثبته واستعمله.
إبحث في موضوع Delcode Delphi Exemple ستجد شرح بالصور.

[AL-MOB4RM3G]

مجرد ActiveX ثبته واستعمله.
إبحث في موضوع Delcode Delphi Exemple ستجد شرح بالصور.

بارك الله لك,, تم التثبيت الآن ولله الحمد,,

طيب اخي الكريم,, وآجهتني مشكلة مع هذا المكون,, وهو انه يريد مسار الملف كامل,, فهل من طريقة لعمل غير هذا,, يعني ان يأخذ مسار الملف مبآشرة,,

مثال على ما **** عمله,,

في الحدث onCreate للفورم يعمل لود لملف موجود في نفس مسار الملف التنفيذي و اسمه 1.pdf ;;


هذا هو الكود الذي احاول استخدامه,,

PHP كود :

acroPdf1.src:= '1.pdf'; 


لكن هذا الكود لا ينفع,, يود المسار الكامل,, يعي انطلاقا من ال C:/ او D

بارك الله فيكم جميعا

[kachwahed]

إذا كان ملف pdf في نفس مجلد البرنامج فاكتب

PHP كود :

acroPdf1.src:= ExtractFilePath(Application.ExeName)+'\1.pdf'; 


[AL-MOB4RM3G]

إذا كان ملف pdf في نفس مجلد البرنامج فاكتب

PHP كود :

acroPdf1.src:= ExtractFilePath(Application.ExeName)+'\1.pdf'; 


شكرا لك اخي الكريم,, اشكرك كثيرا,, لم تخطر في بالي هذه الفكرة

[AL-MOB4RM3G]

اخوآني الكرآم,, كآرثة بنسبة لي والله المستعان,,

الآن وبعد ان انتهيت من البرنامج الذي اعمله,, و اكملت كل شي الّى ملف الم ساعدة,,

جربت ان انقل البرنامج الى جهاز آخر و النتيجة,,, ---------->>> البرنامج لا يعمل,, :confused:

المهم,, بعد الفحص و التحرّيات,, وتركيز والمتاعب توصلت على ان المشكلة هي من هذا المكون الذي اضفته,, وهو AcroPDF لعرض ملفات ال PDF في برنامجي,,

على جهازي هو شغّآل تمام.,

لكن ان كان الجهاز لا يوجد به ال Adobe Acrobat لا يمكن فتح البرنمج من الآصل وتأتي رسآلة خطأ وتغلق البرنامج قبل فتحه,,

انا بحآجة الى عرض ملفات ال PDF في برنامجي حتى ولو لم يتم تنصيب برنامج ال Acrobat عىل جهاز الزبون,, فما هو الحلّ بارك الله لكم,,,

[kachwahed]

كحل بدائي:
1- تعرض رسالة للمستعمل إذا لم يتم العثور على Acrobat تقول له: This program needs to install Adobe Acrobat Reader وبالتالي يجب عليه تثبيته
2- أو ترفق Adobe Acrobat Reader مع Package التثبيت.

[AL-MOB4RM3G]

كحل بدائي:
1- تعرض رسالة للمستعمل إذا لم يتم العثور على acrobat تقول له: This program needs to install adobe acrobat reader وبالتالي يجب عليه تثبيته :d
2- أو ترفق adobe acrobat reader مع package التثبيت.

طيب اخي,, الفكرة 1 اعجبتني ,,, لكن كيف ممكن انا ان اعرف ان كان النستخدم عنده الأكروبات ام لا ؟

[kachwahed]

استخدم التعليمة 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;