GUICtrlCreateInput

[onedayillpay]

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

[NeoFoX]

WinWaitActive('Untitled - Notepad') ;-->wait for Notepad to be active
Send("" & Guictrlread($account)); --> send your info

should do the trick

Neo

[Helge]

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 December 16, 2006 by Helge

[Valuater]

maybe...

expandcollapse popup

#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)