Gui help! Topic is solved
Gui help!
How do i make a gui button follow my mouse inside a gui
Re: Gui help! Topic is solved
Jonas353 wrote:How do i make a gui button follow my mouse inside a gui
You mean something like this?
Code: Select all
#SingleInstance,Force
Coordmode,Mouse,Screen
OnMessage(0x200,"Move_Button")
global Button_W:=50,Button_H:=50,Following_Button
Gui,Add,Button,x0 y0 w%Button_W% h%Button_H% vFollowing_Button,Button
Gui,Show,w600 h600,Button That follows your cursor
return
GuiClose:
ExitApp
Move_Button(){
MouseGetPos,Mouse_X,Mouse_Y
Wingetpos,Win_X,Win_Y,Win_W,Win_H,Button That follows your cursor
if(Mouse_X>=Win_X&&Mouse_X<=(Win_X+Win_W)&&Mouse_Y>=Win_Y&&Mouse_Y<=(Win_Y+Win_H))
GuiControl,Move,Following_Button,% "x" Mouse_X-(Win_X+3)-(Button_W//2) " y" Mouse_Y-(Win_Y+26)-(Button_H//2)
}
*^ESC::ExitApp
Re: Gui help!
Or something more like a homing missile
Code: Select all
#SingleInstance,Force
Coordmode,Mouse,Screen
global Button_X:=200,Button_Y:=200,Button_W:=50,Button_H:=50,Following_Button,Target_X:=A_ScreenWidth//2,Target_Y:=A_ScreenHeight//2,Button_Speed:=3
Gui,Color,Black
Gui,Add,Button,x%Button_X% y%Button_Y% w%Button_W% h%Button_H% vFollowing_Button,Button
Gui,Show,y150 w600 h600,Homing Missile
SetTimer,Chase_Cursor,20
return
GuiClose:
ExitApp
Chase_Cursor:
MouseGetPos,Mouse_X,Mouse_Y
Wingetpos,Win_X,Win_Y,Win_W,Win_H,Homing Missile
if(Mouse_X>=Win_X&&Mouse_X<=(Win_X+Win_W)&&Mouse_Y>=Win_Y&&Mouse_Y<=(Win_Y+Win_H))
MouseGetPos,Target_X,Target_Y
Off_X:=Target_X-(Win_X+3)-(Button_W//2),Off_Y:=Target_Y-(Win_Y+26)-(Button_H//2)
if(Button_X<Off_X-Button_Speed+1)
Button_X+=Button_Speed
else if(Button_X>Off_X+Button_Speed+1)
Button_X-=Button_Speed
if(Button_Y<Off_Y-Button_Speed+1)
Button_Y+=Button_Speed
if(Button_Y>Off_Y+Button_Speed+1)
Button_Y-=Button_Speed
GuiControl,Move,Following_Button,x%Button_X% y%Button_Y%
return
*^ESC::ExitApp
Re: Gui help!
This doesn't seem to work?
Re: Gui help!
Both work for me and are neat little scripts.
Re: Gui help!
I don't see why it wouldn't work for you. What happens when you run it?Jonas353 wrote:This doesn't seem to work?
Re: Gui help!
As soon as I saw his question the first thing that came to mind was Hellbent! Guess I been watching those youtube videos of yours a lot. Thanks for all the great tutorials and video demos
Hellbent wrote:Or something more like a homing missile
Code: Select all
#SingleInstance,Force Coordmode,Mouse,Screen global Button_X:=200,Button_Y:=200,Button_W:=50,Button_H:=50,Following_Button,Target_X:=A_ScreenWidth//2,Target_Y:=A_ScreenHeight//2,Button_Speed:=3 Gui,Color,Black Gui,Add,Button,x%Button_X% y%Button_Y% w%Button_W% h%Button_H% vFollowing_Button,Button Gui,Show,y150 w600 h600,Homing Missile SetTimer,Chase_Cursor,20 return GuiClose: ExitApp Chase_Cursor: MouseGetPos,Mouse_X,Mouse_Y Wingetpos,Win_X,Win_Y,Win_W,Win_H,Homing Missile if(Mouse_X>=Win_X&&Mouse_X<=(Win_X+Win_W)&&Mouse_Y>=Win_Y&&Mouse_Y<=(Win_Y+Win_H)) MouseGetPos,Target_X,Target_Y Off_X:=Target_X-(Win_X+3)-(Button_W//2),Off_Y:=Target_Y-(Win_Y+26)-(Button_H//2) if(Button_X<Off_X-Button_Speed+1) Button_X+=Button_Speed else if(Button_X>Off_X+Button_Speed+1) Button_X-=Button_Speed if(Button_Y<Off_Y-Button_Speed+1) Button_Y+=Button_Speed if(Button_Y>Off_Y+Button_Speed+1) Button_Y-=Button_Speed GuiControl,Move,Following_Button,x%Button_X% y%Button_Y% return *^ESC::ExitApp
Re: Gui help!
lol. I had the same thought when I saw it. Like it was calling me.Hiney wrote:As soon as I saw his question the first thing that came to mind was Hellbent!
Thanks man, I'm glad that there are some people out there that enjoy what little I can offer.Hiney wrote:Guess I been watching those youtube videos of yours a lot. Thanks for all the great tutorials and video demos
Who is online
Users browsing this forum: Ardalion, Google [Bot] and 164 guests