+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي التقنية (https://delphi4arab.net/forum/forumdisplay.php?fid=6)
+--- قسم : دلفي والتعامل مع الملفات (https://delphi4arab.net/forum/forumdisplay.php?fid=22)
+--- الموضوع : معرفة إذا ما كان الإكسل أو الوورد مشغلين (/showthread.php?tid=7956)
معرفة إذا ما كان الإكسل أو الوورد مشغلين - أبو معاذ - 25-06-2016
السلام عليكم ورحمة الله وبركاته ،
لمعرفة إذا كان الأكسل مشغل :
كود :
var
myHandle: HWND;
begin
myHandle := FindWindow('XLMAIN', nil);
if myHandle > 0 then
ShowMessage('الإكسل مشغل')
else
ShowMessage('الأكسل غير مشغل');
end;أما عن الوورد :
كود :
var
myHandle: HWND;
begin
myHandle := FindWindow('OpusApp', nil);
if myHandle > 0 then
ShowMessage('الوورد مشغل')
else
ShowMessage('الوورد غير مشغل');
end;كما يرجى القاء نظرة عن الرابط التالي لمعرفة الكلاس الخاص بتطبيق مايكروسوفت أووفيس
Window class names used in Microsoft Office
إقتباس :http://users.skynet.be/am044448/Programmeren/VBA/vba_class_names.htm
RE: معرفة إذا ما كان الإكسل أو الوورد مشغلين - h-farid - 28-06-2016
و عليكم السلام و رحمة الله و بركاته,
يا شيخ, و ماذا لو أردت أن أعرف إذا كانا مثبتين (بدون تشغيلهما) على الجهاز, هل من فكرة ؟
RE: معرفة إذا ما كان الإكسل أو الوورد مشغلين - أبو معاذ - 29-06-2016
السلام عليكم ،
نعم يمكن فعل ذلك ، وقد أفردت لذلك موضوعا ،
جزاك الله خيرا على التنبيه.
معرفة إذا ما كان الإكسل أو الوورد مثبتين