سلام دوستان عزیز :
من یه سوال دیگه در مورد مخفی کردن Start دارم اگه بهم بگین لطف بزرگی در حقم کردین دوستان :)
سلام دوستان عزیز :
من یه سوال دیگه در مورد مخفی کردن Start دارم اگه بهم بگین لطف بزرگی در حقم کردین دوستان :)
khob soaleshoon hamon mozoshe dige makhfi kardan Start
khob soaleshoon hamon mozoshe dige makhfi kardan Start
Arzhang jouuuuuuuuun
میخواد دکمه استارت ویندوز رو مخفی کنه.
این کار به چه دردی میخوره؟
به هیچ دردی نمیخوره تنها مورد استفادش ایجاد مزاحمت برای دیگرانه. شاید ایشون میخواد یه تروجان بنویسه.نوشته شده توسط اَرژنگ
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Const BUT_SHOW = 5
Private Const BUT_HIDE = 0
Dim Butttonhwnd As Long
Private Sub Form_Load()
Butttonhwnd = FindWindow("Shell_TrayWnd", "")
Butttonhwnd = FindWindowEx(Butttonhwnd, 0, "Button", vbNullString)
ShowWindow Butttonhwnd, BUT_HIDE 'To Hide
'ShowWindow Butttonhwnd, BUT_SHOW 'To Show
End Sub
خیلی جالب بود دستت درد نکنه
اما بی نظم نوشتیش