Abi çok güzel olmuş, ben şimdi kendime göre düzenledim ama kordinatlarla ilgili bir problem var galiba. Reklam dışına yani reklamın dış çevresine tıkladığımda da Oyunu başlat butonu aktif oluyor. Reklam 300x250 boyutlarında ama mouse tıklama genişliği 300x25o den fazla galiba çünkü dışa tıklayınca aktif ediyor Oyuna Başla butonunu. Birde reklamın atrafındaki kaydırma çubuklarını yok edemezmiyiz?
Kodlarım Şu Şekil
[code]#NoTrayIcon
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=patchskin\update.ico
#AutoIt3Wrapper_Res_Comment=Mt2ci Patcher
#AutoIt3Wrapper_Res_Description=Mt2ci Patcher
#AutoIt3Wrapper_Res_LegalCopyright=Mt2ci Patcher
#AutoIt3Wrapper_Res_Language=1031
#AutoIt3Wrapper_res_requestedExecutionLevel=requireAdministrator
#AutoIt3Wrapper_Add_Constants=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Global $hUser32 = DllOpen("User32.dll")
Global $Title = "Mt2ci Patcher"
Global $SITE = "www.mt2ci.com/pack"
Global $CLICK = False,$Mpos
Opt("MouseCoordMode", 0)
Opt("GUIOnEventMode", 1)
Global $MainWindow = GUICreate($Title, 473, 415)
GUISetOnEvent(-3,"_Gui_Exit")
Local $BLUE_OIE = ObjCreate("Shell.Explorer.2")
Local $IE_OBJECT = GUICtrlCreateObj($BLUE_OIE, 0, 0, 300, 250)
GUICtrlSetResizing(-1, 802)
GUICtrlSetState(3-1,2)
$BLUE_OIE.navigate("http://" & $SITE & "/patch.php")
Global $Statedisp = GUICtrlCreateEdit("", 0, 275, 320, 105)
Global $ProgressBar = GUICtrlCreateProgress(0, 385, 320, 17)
Global $Sizedisp = GUICtrlCreateLabel("", 335, 320, 124, 17)
GUICtrlSetBkColor(-1, -2)
Global $Percentdisp = GUICtrlCreateLabel("", 335, 350, 124, 17)
GUICtrlSetBkColor(-1, -2)
DirCreate(@ScriptDir & "\patchskin")
If FileExists(@ScriptDir & "\patchskin\start.jpg") = 0 Then FileInstall("patchskin\start.jpg",@ScriptDir & "\patchskin\start.jpg")
Global $Startgame = GUICtrlCreatePic(@ScriptDir & "\patchskin\start.jpg", 335, 16, 123, 36, 67240192)
GUICtrlSetOnEvent($Startgame,"_Gui_Start")
If FileExists(@ScriptDir & "\patchskin\settings.jpg") = 0 Then FileInstall("patchskin\settings.jpg",@ScriptDir & "\patchskin\settings.jpg")
Global $Settings = GUICtrlCreatePic(@ScriptDir & "\patchskin\settings.jpg", 335, 56, 123, 21, 67240192)
GUICtrlSetOnEvent($Settings,"_Gui_Config")
If FileExists(@ScriptDir & "\patchskin\exit.jpg") = 0 Then FileInstall("patchskin\exit.jpg",@ScriptDir & "\patchskin\exit.jpg")
Global $Exit = GUICtrlCreatePic(@ScriptDir & "\patchskin\exit.jpg", 335, 382, 123, 21, 67240192)
GUICtrlSetOnEvent($Exit,"_Gui_Exit")
If FileExists(@ScriptDir & "\patchskin\background.jpg") = 0 Then FileInstall("patchskin\background.jpg",@ScriptDir & "\patchskin\background.jpg")
Global $Background = GUICtrlCreatePic(@ScriptDir & "\patchskin\background.jpg", 0, 0, 473, 415, 67240192)
GUICtrlSetData($Statedisp, "Internet bağlantısı kontrol ediliyor." & @CRLF ,1)
GUISetState(@SW_SHOW)
DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1)
While 1
Sleep (100)
If $CLICK = False And (_IsPressed("01", $hUser32) And WinActive($MainWindow) <> 0) Then
$Mpos = MouseGetPos()
If ($Mpos[0] > 5 And $Mpos[1] > 5) And ($Mpos[0] < 330 And $Mpos[1] < 300) Then
$CLICK = True
Endif
EndIf
WEnd
Func _Gui_Exit()
Exit
EndFunc
Func _Gui_Start()
If $CLICK = True Then
Run("Mt2ciPVP.exe")
Exit
Else
MsgBox(0,$Title,'Reklama tıklamadan oyuna giremezsiniz!',0,$MainWindow)
EndIf
EndFunc
Func _Gui_Config()
ShellExecute("Config.exe")
EndFunc
Func _IsPressed($sHexKey, $vDLL = 'user32.dll')
; $hexKey must be the value of one of the keys.
; _Is_Key_Pressed will return 0 if the key is not pressed, 1 if it is.
Local $a_R = DllCall($vDLL, "short", "GetAsyncKeyState", "int", '0x' & $sHexKey)
If @error Then Return SetError(@error, @extended, False)
Return BitAND($a_R[0], 0x8000) <> 0
EndFunc ;==>_IsPressed
[/code]