المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : طلب كود غلق البرامج المفتوحة


سامي ديزاد
26-04-2017, 08:51 AM
السلام عليكم
طلب كود غلق نافذة البرامج المفتوحة وغلق نهائي حتى بجوار الساعة بارك الله فيكم
كما في الصورة

http://imgur.com/fJKT2WK.png

سامي ديزاد
01-05-2017, 07:51 AM
السلام عليكم
لدي هذا الكود لكنه ل يفلق جميع البرامج
ممكن التعديل عليه

x = Input.GetText("Input1");
result = System.EnumerateProcesses();
for i in pairs (result) do
if String.Find(result[i], x, 1, false)~= -1 and x~="" then
System.TerminateProcess(i);
Dialog.Message("",i)
end
end

ياسرهتهت
01-05-2017, 10:50 PM
بسم الله الرحمن الرحيم
جرب هذا الملف في المرفقات
موفق بإذن الله ... لك مني أجمل تحية .

سامي ديزاد
01-05-2017, 11:54 PM
شكرا أخي ياسر ، فكرة رائعة بورك فيك أخي الكريم
اشكاليتي هو ان الكود المستعمل من طرفي يغلق بعضا من البرامج
لكن ما أردته هو ان اختار بنفسي البرنامج المراد غلقه

ثامر أبو بلقيس
05-05-2017, 02:14 AM
السلام عليكم
لدي هذا الكود لكنه ل يفلق جميع البرامج
ممكن التعديل عليه

x = Input.GetText("Input1");
result = System.EnumerateProcesses();
for i in pairs (result) do
if String.Find(result[i], x, 1, false)~= -1 and x~="" then
System.TerminateProcess(i);
Dialog.Message("",i)
end
end

قد تتخلى من الاساس عن دالة البحث
كأن تغلق برنامجا بعينه مثلا : الايكسل
نجرب :

file_to_check_for = "excel.exe";
processes = System.EnumerateProcesses();
for j, file_path in pairs(processes) do
file = String.SplitPath(file_path);
if (String.Lower(file.Filename..file.Extension)) == file_to_check_for then
System.TerminateProcess(j);
end
end



الان ما المطلوب :abc_138:

سامي ديزاد
08-05-2017, 12:20 AM
شكرا أخي ثامر إذن لا يوجد كود شامل لغلق جميع البرامج كلا على حدا
بارك الله فيك وجزاك الله عنا كل خير

ثامر أبو بلقيس
08-05-2017, 01:09 AM
الله يوفقك أخي الكريم :abc_138: