Kripp4 Posted April 19, 2005 Posted April 19, 2005 #include <GuiConstants.au3> If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000 GuiCreate("Info", 140, 178,(@DesktopWidth-140)/2, (@DesktopHeight-178)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $Button_1 = GuiCtrlCreateButton("Start", 0, 100, 140, 80) $Input_2 = GuiCtrlCreateInput("Nick", 0, 0, 140, 20) $Input_3 = GuiCtrlCreateInput("Pass", 0, 30, 140, 20) $Input_4 = GuiCtrlCreateInput("Text att spamma", 0, 60, 140, 20) GuiSetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case Else ;;; EndSelect WEnd Exit What do i write for the button to start the script?
Helge Posted April 19, 2005 Posted April 19, 2005 Like this ? #include <GuiConstants.au3> If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000 GuiCreate("Info", 140, 178,(@DesktopWidth-140)/2, (@DesktopHeight-178)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $Button_1 = GuiCtrlCreateButton("Start", 0, 100, 140, 80) $Input_2 = GuiCtrlCreateInput("Nick", 0, 0, 140, 20) $Input_3 = GuiCtrlCreateInput("Pass", 0, 30, 140, 20) $Input_4 = GuiCtrlCreateInput("Text att spamma", 0, 60, 140, 20) GuiSetState() While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Case $msg = $Button_1 ; spam her ! MsgBox(64,"","Slem svenske !") ExitLoop Case Else ;;; EndSelect WEnd Exit
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now