Genuine Key


Genuine Key


Moved to new forum, Click Here to register

تم الانتقال للمنتدى الجديد, اضغط هنا للتسجيل
هل يمكن إغلاق عمليات process بالاوتوبلي؟

السلام عليكم

اريد اضع كود بـ زر يغلق عمليات process
مثلا اذا كان برنامج winrar,exe شغال في process
عند النقر على زر في الاسطوانة يغلقه
(kill process )

والأمر الأخر , اني وضعت شريط حالة التقدم Progress في تطبيق لي وشغال تمام ,
لكن هل يمكن ان اربط الـ Progress مع الملف الذي يتم نسخه ؟
يعني مثلا وضعت اوامر بنسخ ملف 2 جيجا الى مسار معين
اريد اضع شريط الحالة Progress عند النسخ , بحث نسبة النسخ المؤوية مربوطة مع شريط الحالة بالضبط
بمعنى انه لما يصل نسبة النسخ لـ 50% يظهر في شريط التحميل 50% بالضبط
هل يمكن ذلك

جزاكم الله خيراً

المواضيع المشابهه

الEURUSD و3 عمليات كسر

كيف أغير شاشة خصائص الويندوز وشاشة إغلاق المستخدم و إغلاق الكمبيوتر ليبحوا كالمثال

جميع طرق إغلاق الحاسب

إغلاق المتصفح في الشبكة

فتح و إغلاق الإسطوانة


لماذا لا تستخدم StatusDlg.Show عوضا عن Progress فهو يكفيك كل ما تريد جربه

كود PHP:
StatusDlg.Show(MB_ICONNONEfalse);
File.Copy("AutoPlay\\Docs\\*.*"DestFolder.."\\Copied Files\\"truetruefalsetruenil);
StatusDlg.Hide(); 


بالنسبة لتوقيف النسخ مثلا او تقدم في جرب الامر

كود PHP:
Application.ExitScript(); 
و الله اعلم ( للامانة لنا الى حد الساعة اجرب )


السلام عليكم
لاحظ معي وضعت 500 ملفا ( صورة ) في مجلد باسم salam22 في محلد المشروع
الان نريد تحميل الملف او محتوى الملف كله الى مجلد انشاناه في المستندات باسم CopieFiles
نريد ان يكون التحميل يساير progress مع النسبة المئوية ....و في ليبال يظهر الملفات التي ننسخها
و لما يتنهي تظهر رسالة في progress تعلمنا بنهاية التحميل مع ذكر عدد الملفات التي تم نسخها

http://www.damasgate.com/vb/attachm...1&d=1509652887

طبعا اذا كان هناك مجلدات داخل محلد salam22 نعوض false في السطر الثالث بـ true اي يتضمن النقل المجلدات الضمنية


لم افهم ما معنى
----------------------------------------------
اريد اضع كود بـ زر يغلق عمليات process
مثلا اذا كان برنامج winrar,exe شغال في process
عند النقر على زر في الاسطوانة يغلقه
(kill process )

-------------------------------------
هل تقصد ان البرنامج شغال في الحاسوب و تريد غلقه من المشروع ؟
ام توقف عملية النسخ ؟


السلام عليكم
لاحظ معي وضعت 500 ملفا ( صورة ) في مجلد باسم salam22 في محلد المشروع
الان نريد تحميل الملف او محتوى الملف كله الى مجلد انشاناه في المستندات باسم CopieFiles
نريد ان يكون التحميل يساير progress مع النسبة المئوية ....و في ليبال يظهر الملفات التي ننسخها
و لما يتنهي تظهر رسالة في progress تعلمنا بنهاية التحميل مع ذكر عدد الملفات التي تم نسخها

http://www.damasgate.com/vb/attachm...1&d=1509652887

طبعا اذا كان هناك مجلدات داخل محلد salam22 نعوض false في السطر الثالث بـ true اي يتضمن النقل المجلدات الضمنية
الله يجازيك الجنة ويبارك فيك
تم تحميل مشروعك وتشغيله وتمام
لكن لا اريد ان يظهر عدد الملفات ولا رسالة تظهر بالنهاية ولا مسار الملفات التي يتم نسخها
يعني فقط ربط الشريط مع الملفات ربط مضبوط

وياليت لو تشرح لنا هالكود اللي في مشروعك لكي استفيد منه مستقبلا


كود:
-- استدعاء مجلد المستندات 
DestFolder = Shell.GetFolder(SHF_MYDOCUMENTS);
-- هذه لانشاء مجلد
Folder.Create(DestFolder.."\\Copied Files");
-- بحث عن مجلد 
igli = File.Find(_SourceFolder.."\\salam22", "*.*", false, false); 
هنا اذا تحقق الشرط سيبدأ ماذا ؟ اتمنى تشرحه  
if (igli) then
Progress.SetRange("Progress1", 0, #igli);
for k,v in pairs(igli) do
Progress.SetCurrentPos("Progress1",k)
Progress.SetText("Progress1", k*100/#igli.." %");
File.Copy(v, DestFolder.."\\Copied Files\\", true, true, false, true, nil);
Label.SetText("Label1", v)
end
end

if Progress.GetCurrentPos("Progress1") >= 100 then
Progress.SetText("Progress1","انتهى التحميل بنجاح ..تم نسخ  "..#igli .." ملف " );
Label.SetText("Label1","")
end


لم افهم ما معنى
----------------------------------------------
اريد اضع كود بـ زر يغلق عمليات process
مثلا اذا كان برنامج winrar,exe شغال في process
عند النقر على زر في الاسطوانة يغلقه
(kill process )

-------------------------------------
هل تقصد ان البرنامج شغال في الحاسوب و تريد غلقه من المشروع ؟
ام توقف عملية النسخ ؟
البرامج التي تعمل في الخلفيه
في التاسك مانجر


الله يجازيك الجنة ويبارك فيك
وياليت لو تشرح لنا هالكود اللي في مشروعك لكي استفيد منه مستقبا
file.find دالة للبحث وهي تضع كل النتائج في مصفوفة سمينها نحن igli ......

هذا يعني عدد عمناصر المصفوفة اي عدد الملفات الموجودة التي وجدنها في المجلد المصدر
كود PHP:
#igli 
ثم نحدد طول progress اي نحدد قيمة البداية و هي 0 و النهاية هي طول المصفوفة و التي هي 100 %
كود PHP:
Progress.SetRange("Progress1"0#igli); 
الان نعرض هناصر المصفوفة بواسطة الكود التالي ..... حيث k هي رقم العنصر او ترتيبه ...v هو مسار الملف المصدر الذي ترتيه في النتائج هو k .....
كود PHP:
for k,v in pairs(igli) do 
الان نحعل progress يتقدم حسب تقدم رقم الملف .........اي اذا كنا سننقل الملف رقم 50 مثلا سيكون التقدم في progress في 50 اي نسبيا ....
كود PHP:
Progress.SetCurrentPos("Progress1",k
الان سنظهر النسبة كنص في progress .قبل ذلك شرط يجب ان نفعل خاصية ظهور النص من خصائص progress في *color تفعل Use custom colors ..............
الان النسبة هي رقم الملف * 100 تفسيم عدد الملفات كلها ..............
كود PHP:
Progress.SetText("Progress1"k*100/#igli.." %"); 
كي لا يظهر رقمين فقط بعد الفاصلة نستعمل الدالة math.round
كود PHP:
Progress.SetText("Progress1"Math.Round(k*100/#igli,2).." %"); 

الان كود النسخ من الملف المصدر من المشروع وهو v .......الى الملف الموجه اليه
كود PHP:
File.Copy(vDestFolder.."\\Copied Files\\"truetruefalsetruenil); 
الان نسمي الملفات المنسوخة و نظهرها في ليبال
كود PHP:
Label.SetText("Label1"v
الكود الاخير لظخور رسالة نهاية النسخ
كود PHP:
if Progress.GetCurrentPos("Progress1") >= 100 then
Progress
.SetText("Progress1","انتهى التحميل بنجاح ..تم نسخ  "..#igli .." ملف " );
Label.SetText("Label1","")
end 


انت تعدل الكود حسب ما تريد و ما تريد اظهاره

----------------------
كود PHP:
DestFolder Shell.GetFolder(SHF_MYDOCUMENTS);
Folder.Create(DestFolder.."\\Copied Files");
igli File.Find(_SourceFolder.."\\salam22""*.*"truetrue); 
if (
iglithen
Progress
.SetRange("Progress1"0#igli);
for k,v in pairs(igli) do
Progress.SetCurrentPos("Progress1",k)
Progress.SetText("Progress1",Math.Round(k*100/#igli,2).." %");
File.Copy(vDestFolder.."\\Copied Files\\"truetruefalsetruenil);
end
end 


البرامج التي تعمل في الخلفيه
مثلا نريد غلق winrar .........
يمكن استبداله بما تشاء غلقه
كود PHP:
file_to_check_for "winrar.exe"
processes System.EnumerateProcesses();

for 
jfile_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 


أدوات الموضوع

الانتقال السريع

منتديات داماس

DamasGate