Merchants

Question: Why does it fail? I got this error again on a other icon same problem If i try the add the high quality icon it fail and the lower quality works Got the icon from a game exe using resource hacker I have attach the 2 icon files so the dev can take a better look at it Icon1 = high quality Icon2 = next step down qualtiy Also addit source where i got the icon from Merchants Icon1.ico Icon2.ico

Also worked for me

Thanks it works

why is this key not working HotKeySet("{OEM_109}", "Start") Gr Merchants

I Fix it on my own: #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Global $aPos = WinGetPos("[CLASS:Notepad]"), $test=0, $test2=0,$Text,$Text2, $count=0 $Form1 = GUICreate("NotePad Leech!", 300, $aPos[3] - 40, $aPos[0] + 5 + $aPos[2], $aPos[1] + 5) $Text = GUICtrlCreateLabel("WinActive Notepad: " & $test, 5, 5) $Text2 = GUICtrlCreateLabel("WinActive Notepad Leech!: " & $test2, 5, 25) Opt("WinTitleMatchMode","2") GUISetState(@SW_SHOW) GUIRegisterMsg($WM_TIMER, "_Interrupt") DllCall("User32.dll", "int", "SetTimer", "hwnd", $Form1, "int", 0, "int", 0, "int", 0) While 1 Sleep(1) $nMsg = GUIGetMsg() Switch $nMsg Exit Case $GUI_EVENT_CLOSE EndSwitch WEnd Func _Interrupt() Global $bPos = WinGetPos("NotePad Leech!") Global $aPos = WinGetPos("[CLASS:Notepad]") If $bPos[0] <> $aPos[0] + $aPos[2] Or $aPos[1] <> $bPos[1] And WinActive("[CLASS:Notepad]") Then WinMove("NotePad Leech!", "", $aPos[0] + 5 + $aPos[2], $aPos[1] + 5, 300, $aPos[3] - 10) EndIf If $bPos[0] <> $bPos[0] - $aPos[2] Or $bPos[1] <> $aPos[1] And WinActive("NotePad Leech!") Then WinMove("[CLASS:Notepad]", "", $bPos[0] - 5 - $aPos[2], $bPos[1] - 5, 300, $bPos[3] + 10) EndIf If WinActive("[CLASS:Notepad]") Then If $test=0 Then WinSetOnTop("NotePad Leech!", "", 1) WinSetOnTop("NotePad Leech!", "", 0) $test=1 EndIf Else $test=0 EndIf If WinActive("NotePad Leech!") Then If $test2=0 Then WinSetOnTop("[CLASS:Notepad]", "", 1) WinSetOnTop("[CLASS:Notepad]", "", 0) $test2=1 EndIf Else $test2=0 EndIf If $count = 10 Then $count=0 GUICtrlSetData($Text, "WinActive Notepad: " & $test) GUICtrlSetData($Text2, "WinActive Notepad Leech!: " & $test2) Else $count+=1 EndIf EndFunc Thx for everyone's suggestions

I realy don't like the setontop func there is a correct way to do this ?

Here u go:

bump

bump

Oké not bad it worked. I edit it a little better so it doesn't get hanged up when you drag de GUI nieuw problem when i drag the notepad it hide the gui and the other way around any way to fix that? #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Global $aPos = WinGetPos("[CLASS:Notepad]") $Form1 = GUICreate("NotePad Leech!", 300, $aPos[3] - 40, $aPos[0] + 5 + $aPos[2], $aPos[1] + 5) GUISetState(@SW_SHOW) GUIRegisterMsg($WM_TIMER, "_Interrupt") DllCall("User32.dll", "int", "SetTimer", "hwnd", $Form1, "int", 0, "int", 0, "int", 0) While 1 Sleep(1) $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _Interrupt() Global $bPos = WinGetPos("NotePad Leech!") Global $aPos = WinGetPos("[CLASS:Notepad]") If $bPos[0] <> $aPos[0] + $aPos[2] Or $aPos[1] <> $bPos[1] And WinActive("[CLASS:Notepad]") Then WinMove("NotePad Leech!", "", $aPos[0] + 5 + $aPos[2], $aPos[1] + 5, 300, $aPos[3] - 10) EndIf If $bPos[0] <> $bPos[0] - $aPos[2] Or $bPos[1] <> $aPos[1] And WinActive("NotePad Leech!") Then WinMove("[CLASS:Notepad]", "", $bPos[0] - 5 - $aPos[2], $bPos[1] - 5, 300, $bPos[3] + 10) EndIf EndFunc

btw check post 1 again is it not possible with GUIRegisterMsg?

how to stick a GUI to notepad so it comes along when i drag notepad And the other way around (When you drag the GUI the notepad comes along) Opt("MouseCoordMode", 2) #include <WindowsConstants.au3> $Win = WinGetHandle("notepad.exe") WinActivate($Win) Global $iGUI = GUICreate("test", 175, 160, 200, 200) GUICtrlCreateLabel("Some text", 5, 5) GUISetStyle($WS_CAPTION, $WS_BORDER) GUISetState(@SW_SHOW, $iGUI) GUIRegisterMsg($WM_MOVE, "_Position_Child") While 1 Sleep(1) WEnd Func _Position_Child() Local $aGUI_Main_Pos = WinGetPos($Win) WinMove($iGUI, "", $aGUI_Main_Pos[0], $aGUI_Main_Pos[1]) EndFunc

the problem is fixed Thank you

and that can be done with this? _GDIPlus_GraphicsDispose($hGraphic) _GDIPlus_ImageDispose($hImage)

hi i have a img loadit in a GUI done it with: _GDIPlus_StartUp() GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT") Load_Img("any Pic", $GUI[0]) Sleep(1500) _GDIPlus_GraphicsDispose($hGraphic) _GDIPlus_ImageDispose($hImage) _WinAPI_RedrawWindow($GUI[0]) Sleep(10) DirRemove(@ScriptDir & "\Img_Folder\",1) Func Load_Img($pic, $hwin) $hImage = _GDIPlus_ImageLoadFromFile($pic) $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hwin) _WinAPI_RedrawWindow($hwin) EndFunc Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam) _WinAPI_RedrawWindow($GUI[0], 0, 0, $RDW_UPDATENOW) _GDIPlus_GraphicsDrawImageRect($hGraphic, $hImage, 10, 75, 768, 576) ; Standaard Pal formaat _WinAPI_RedrawWindow($GUI[0], 0, 0, $RDW_VALIDATE) Return $GUI_RUNDEFMSG EndFuncbut the image is located in a folder if i want to delete the dir i said that the img file is in use by Autoit what can i do? Gr Merchants