منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ShortCut.Hotkey
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
أخواني الأعزاء
لدي استفساران من فضلكم
1- عند حجز مفتاح معين لتشغيل البرنامج، اين يكون المكان الذي تم حفظ هذا المفتاح فيه
2- هل يمكن إزالة هذا المفتاح بالكود وبدون عمل Restart للجهاز



أفيدوني جزاكم الله خيراً
فكرة جميلة جداً
في الحقيقة لا اعلم اين يتم التخزين ( ولكن اعتقد في الريجستري )
عموما لدي كود بالفيجوال بيسك . لعمل اختصار وعمل Key  له .
قم باضافة Reference 

PHP كود :
Reference -> COM -> Windows Script Host Object Model 
 
ثم في شاشة الفورم 
PHP كود :
Imports IWshRuntimeLibrary 
ثم في زر انشاء الاختصار
PHP كود :
Dim wshshell CreateObject("WScript.Shell")
 
       Dim desktop wshshell.SpecialFolders("desktop")
 
       Dim linkname As String
        linkname 
desktop "\Hello world" ".lnk"
 
       Dim scut wshshell.CreateShortcut(linkname)
 
       scut.TargetPath "c:\windows\system32\calc.exe"
 
       scut.Hotkey "Ctrl+Alt+0"
 
       scut.Save() 
 للعلم فقط .
 اذا تم الضغط على Ctrl+Alt+0 في اي مكان سيتم فتح البرنامج  Big Grin


لازالة الـHotkey
نفس الكود ولكن 
   scut.Hotkey = ""
شكرا أخي العزيز HASAN6.0
أنا كذلك اعتقدت أن مكان حفظه هو الريجستري لكني لم أجده حتى الآن، وبالتالي أعتقد لو كان ذلك سيكون حذفه والتحكم به أسهل برمجياً
بانتظار ردودكم بارك الله فيكم
شوف هاد الرابط ((registerhotkey (user32)
 بسم الله الرحمن الرحيم 
اللهم صلي علي الحبيب محمد  وبارك علي اله وصحابته والتابعين 
السلام عليكم اخي الكريم 
اسف ليس لدي الخبره في التعامل مع الريجستري بس بحاول اساعد لو استفدت حاول تفيدنا معاك
شوف المثال في هذه المشاركه  اعتقد انه هيفيدك في حل مشكلتك 
واذ لم يفيدك اكيد هيضيفلك جديد
وده شرح لاستخدامه وما يقوم به في ملف الريجستري

افتح   run 
شباك/ ويندوز +R 
اكتب regedit
تابع 
رابط المشاركه

راجع الشرح ف يالموضوع الجميل ده هيساعدك كتير

الشاكي لله

وده شرح الاستخدام
اتمنالك الافاده