View Full Version : سوال: کلیک کردن مصنوعی
Hawrehh
جمعه 09 آبان 1399, 01:36 صبح
دوستان ببخشید به خاطر عنوان تایپک چیزی به زهنم نرسید
من نیاز دارم که توی وژوال بیسیک چک کنم که اگه دکمه چپ موس خار از برنامه زده شد یک اتفاقی بیافته ولی نمیخوام در اون لحظه کلیک عمل کنه
فرض کننید یک تایمر رو فعال کردیم و مدام چک میکنه که اگه کلید چپ موس زده شد غیر فعال بشه و در این حال برنامه مخفیه و وقتی کلید زده شد برنامه ظاهر میشه
این کارو انجام دادم اما نمیخوام کلیکی که میزنم روی پنجره های دیگه یا هر جایی که هست عمل کنه
www.pc3enter.tk
سه شنبه 13 آبان 1399, 15:30 عصر
بیا، یک جستجوی ساده میکردی بد نبودا
Dim Registry As Object
Set Registry = CreateObject("WScript.Shell")
Registry.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer"& "\NoViewContextMenu", 1, "REG_DWORD"
منابع: https://www.vbforums.com/showthread.php?303892-Disable-Mouse-right-click
https://stackoverflow.com/questions/45185149/disabling-mouse-right-click-on-image-control-vb6
https://www.daniweb.com/programming/software-development/threads/409582/disable-right-click-on-textbox
Hawrehh
چهارشنبه 14 آبان 1399, 19:26 عصر
بیا، یک جستجوی ساده میکردی بد نبودا
Dim Registry As Object
Set Registry = CreateObject("WScript.Shell")
Registry.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr entVersion\Policies\Explorer"& "\NoViewContextMenu", 1, "REG_DWORD"
منابع: https://www.vbforums.com/showthread.php?303892-Disable-Mouse-right-click
https://stackoverflow.com/questions/45185149/disabling-mouse-right-click-on-image-control-vb6
https://www.daniweb.com/programming/software-development/threads/409582/disable-right-click-on-textbox
این کد ها کار نکردن منظور من این بود ولی ممنون داداش
Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
BlockInput True
Sleep 5000
BlockInput False
End Sub
www.pc3enter.tk
جمعه 16 آبان 1399, 13:19 عصر
اینکه که گذاشتی رو قبلاً خودم میدونستم، این کد که میاد کامل موس و کیبورد را از کار میاندازه
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.