Search the Community
Showing results for tags 'autoit source'.
Found 1 result
-
this programm simply hides the window/click through refresh button list,s all running wow processes get window button get the current aktive window with a 5 sec delay reduced my wow cpu usage by 50% on ultra settings #include <GUIConstantsEx.au3> #include <WindowsConstants.au3>#include <GuiListView.au3>AutoItSetOption("WinTitleMatchMode", 2) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase $Form1 = GUICreate("Window Hider", 200, 260, 361, 346) $ListView = GUICtrlCreateListView("Process|ID",0,10,200,150) $Button1 = GUICtrlCreateButton("Get Window", 100, 170, 75, 25) $Button2 = GUICtrlCreateButton("Hide", 100, 210, 75, 25) $Button3 = GUICtrlCreateButton("Show", 10, 210, 75, 25) $Button4 = GUICtrlCreateButton("Refresh",10,170,75,25) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Sleep(5000) $Hwnd = WinGetProcess("[active]") $lol = _PIDGetProcessName($Hwnd) GUICtrlCreateListViewItem($lol & '|' & $Hwnd,$ListView) Case $Button2 $iSelect = ControlListView($Form1, "", $ListView, "GetSelected") $Pid = ControlListView($Form1, "", $ListView, "GetText", $iSelect,1) $Hwnd = _GetHwndFromPID($Pid) WinSetTrans($Hwnd,"",0) _GUICtrlListView_SetItemText($ListView,$iSelect,"Hidden") Case $Button3 $iSelect = ControlListView($Form1, "", $ListView, "GetSelected") $Pid = ControlListView($Form1, "", $ListView, "GetText", $iSelect,1) $Hwnd = _GetHwndFromPID($Pid) WinSetTrans($Hwnd,"",255) $lol = _PIDGetProcessName($Pid) _GUICtrlListView_SetItemText($ListView,$iSelect,$lol) Case $Button4 refresh() EndSwitch WEnd Func refresh() Local $var = ProcessList("wow.exe") _GUICtrlListView_DeleteAllItems($ListView) For $i = 1 To $var[0][0] GUICtrlCreateListViewItem($var[$i][0] & '|' & $var[$i][1] ,$ListView) Next EndFunc Func _GetHwndFromPID($PID) $hWnd = 0 $stPID = DllStructCreate("int") Do $winlist2 = WinList() For $i = 1 To $winlist2[0][0] If $winlist2[$i][0] <> "" Then DllCall("user32.dll", "int", "GetWindowThreadProcessId", "hwnd", $winlist2[$i][1], "ptr", DllStructGetPtr($stPID)) If DllStructGetData($stPID, 1) = $PID Then $hWnd = $winlist2[$i][1] ExitLoop EndIf EndIf Next Sleep(100) Until $hWnd <> 0 Return $hWnd EndFunc ;==>_GetHwndFromPID Func _PIDGetProcessName($vPID) $aProcesslist = ProcessList() For $i = 1 To $aProcesslist[0][0] If $aProcesslist[$i][1] = $vPID Then Return $aProcesslist[$i][0] Next EndFunc ;==>_PIDGetProcess Download: https://anonfiles.com/file/9ae8d80af262cb133200f8af34567c4e