Sign in to follow this  
Followers 0
onedayillpay

GUICtrlCreateInput

4 posts in this topic

after you click "login" i cant get this script to send(""&$account) to note pad

i dont understand...

#include <XSkin.au3>
$guiTitle = "XSkin"
; folder of skin
$Skin_Folder = @DesktopDir & "\Skins\Myskin"
$Icon_Folder = @DesktopDir & "\Skins\Default"
$XSkinGui = XSkinGUICreate( "My GUI", 420, 260, $Skin_Folder)

$account = GUICtrlCreateInput ("", 125, 69, 210, 15,$ES_UPPERCASE ,$WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1,0x00ff00)  ; Green

$pass = GUICtrlCreateInput ("", 125, 99, 210, 15,$ES_PASSWORD,$WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1,0x00ff00)  ; Green
    
$Button = GUICtrlCreateButton("Login",120,125,83,25)
GUISetState()
While 1
    Switch GUIGetMsg()
      
        Case $Button
          ;FileWriteLine(@DesktopDir & "\..............test first)
          run('notepad.exe')
          
           Send(""&$account);y wont the program send $account
          
            exit 
      
    EndSwitch
WEnd

Share this post


Link to post
Share on other sites



#3 ·  Posted (edited)

Doesn't say anything in the helpfile about the value of the assigned variable being automatically

updated to equal the Input's text : "Return Value : Returns the identifier (controlID) of the new control."

Below that however, it explains how to get the text, by using the returned ID..

"To obtain the value of the control see GUICtrlRead."

Btw, what's the deal with the "" in the beginning of Send ?

Edited by Helge

Share this post


Link to post
Share on other sites

maybe...

#include <XSkin.au3>
$guiTitle = "XSkin"
; folder of skin
;$Skin_Folder = @DesktopDir & "\Skins\Myskin"
;$Icon_Folder = @DesktopDir & "\Skins\Default"
$Skin_Folder = @ScriptDir & "\Skins\blackjack" ; for testing
$Icon_Folder = @ScriptDir & "\Skins\Default"
$XSkinGui = XSkinGUICreate ("My GUI", 420, 260, $Skin_Folder)
$XIcon = XSkinIcon($XSkinGui, 2)

$account = GUICtrlCreateInput("", 125, 69, 210, 15, $ES_UPPERCASE, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x00ff00)  ; Green

$pass = GUICtrlCreateInput("", 125, 99, 210, 15, $ES_PASSWORD, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x00ff00)  ; Green

$Button = GUICtrlCreateButton("Login", 120, 125, 83, 25)
GUISetState()
While 1
    Switch GUIGetMsg()
        
        Case $Button
            ;FileWriteLine(@DesktopDir & "\..............test first)
            $Raccount = GUICtrlRead($account)
            $Rpass = GUICtrlRead($pass)
            If $Raccount <> "" And $Rpass <> "" Then
                Run('notepad.exe')
                WinWaitActive("")
                Send("Account #" & $Raccount & @CRLF);y wont the program send $account
                Send("Password #" & $Rpass & @CRLF)
            EndIf
        Case $XIcon[1]
            Exit
        Case $XIcon[2]
            GUISetState(@SW_MINIMIZE, $XSkinGUI)
            
    EndSwitch
WEnd

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0