delphi4arab منتديات دلفي للعرب

نسخة كاملة : عرض ملفات pdf في برنامجي,, كيف؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورمة الله

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

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

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

شكرا لكم
نعم,, نسيت ان اقول انني استخدم دلفي 2009 بارك الله فيكم
مجرد ActiveX ثبته واستعمله.
إبحث في موضوع Delcode Delphi Exemple ستجد شرح بالصور.
kachwahed كتب :مجرد ActiveX ثبته واستعمله.
إبحث في موضوع Delcode Delphi Exemple ستجد شرح بالصور.

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

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

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

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


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

PHP كود :
acroPdf1.src:= '1.pdf'; 

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

بارك الله فيكم جميعا
إذا كان ملف pdf في نفس مجلد البرنامج فاكتب
PHP كود :
acroPdf1.src:= ExtractFilePath(Application.ExeName)+'\1.pdf'; 
kachwahed كتب :إذا كان ملف pdf في نفس مجلد البرنامج فاكتب
PHP كود :
acroPdf1.src:= ExtractFilePath(Application.ExeName)+'\1.pdf'; 

شكرا لك اخي الكريم,, اشكرك كثيرا,, لم تخطر في بالي هذه الفكرة Cool
اخوآني الكرآم,, كآرثة بنسبة لي والله المستعان,,

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

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

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

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

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

انا بحآجة الى عرض ملفات ال PDF في برنامجي حتى ولو لم يتم تنصيب برنامج ال Acrobat عىل جهاز الزبون,, فما هو الحلّ بارك الله لكم,,, Sad
كحل بدائي:
1- تعرض رسالة للمستعمل إذا لم يتم العثور على Acrobat تقول له: This program needs to install Adobe Acrobat Reader وبالتالي يجب عليه تثبيته Big Grin
2- أو ترفق Adobe Acrobat Reader مع Package التثبيت.
kachwahed كتب :كحل بدائي:
1- تعرض رسالة للمستعمل إذا لم يتم العثور على acrobat تقول له: This program needs to install adobe acrobat reader وبالتالي يجب عليه تثبيته :d
2- أو ترفق adobe acrobat reader مع package التثبيت.

طيب اخي,, الفكرة 1 اعجبتني Smile,,, لكن كيف ممكن انا ان اعرف ان كان النستخدم عنده الأكروبات ام لا ؟
استخدم التعليمة 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
; 
الصفحات : 1 2