need help: command for (edit box)

[retaly]

hy guys,

i want to do this:

here is an example.:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 217, 157, 192, 124)
$hello = GUICtrlCreateInput("hello", 50, 65, 121, 21)
GUICtrlCreateCheckbox("on/off", 60, 96, 97, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
EndSwitch
WEnd

(of course isnt options in this gui cuz its only one example)

so i made an edit box with sender, what i am writing in box to send for notepad, and it is work. BUT!

i want to do how always send capital letter(automatical push always the shift for this edit box) the all text in edit box for notepad, so "HELLO" and not "hello"

Edited September 15, 2011 by retaly

[smashly]

Hi, you can use $ES_UPPERCASE style for your input box.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>

Global $hGui, $iInput, $iButton

ShellExecute("notepad.exe")

$hGui = GUICreate("", 217, 157, 192, 124, -1, $WS_EX_TOPMOST)
$iInput = GUICtrlCreateInput("hello", 50, 65, 121, 21, $ES_UPPERCASE)
$iButton = GUICtrlCreateButton("Send", 60, 96, 97, 20)
GUISetState(@SW_SHOW, $hGui)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $iButton
            ControlSend("[CLASS:Notepad]", "", "[CLASSNN:Edit1]", GUICtrlRead($iInput) & @CR)
            GUICtrlSetData($iInput, "")
    EndSwitch
WEnd

Cheers

Edited September 16, 2011 by smashly

[retaly]

thx a lot, i have one more question:

how can i do this:

$iInput = GUICtrlCreateInput("2233", 50, 65, 121, 21)

now there are 22 and 33 number in box, and how can i do how the editbox send: ˇˇ^^ in to notepad

Edited September 16, 2011 by retaly

[smashly]

Hi,

Use the flag parameter in control send.

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>

Global $hGui, $iInput, $iButton

ShellExecute("notepad.exe")

$hGui = GUICreate("", 217, 157, 192, 124, -1, $WS_EX_TOPMOST)
$iInput = GUICtrlCreateInput("^^2233^^", 50, 65, 121, 21, $ES_UPPERCASE)
$iButton = GUICtrlCreateButton("Send", 60, 96, 97, 20)
GUISetState(@SW_SHOW, $hGui)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $iButton
            ControlSend("[CLASS:Notepad]", "", "[CLASSNN:Edit1]", GUICtrlRead($iInput) & @CR, 1);  flag 1, keys are sent raw.
            GUICtrlSetData($iInput, "")
    EndSwitch
WEnd

[retaly]

thx, ah :S can but i can do how if i write 3 in box, the script send ^ for notepad. this is my problem, and i cant fix it :S

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
Global $hGui, $iInput, $iButton
ShellExecute("notepad.exe")
$hGui = GUICreate("", 217, 157, 192, 124, -1, $WS_EX_TOPMOST)
$iInput = GUICtrlCreateInput("3", 50, 65, 121, 21, $ES_UPPERCASE)
$iButton = GUICtrlCreateButton("Send", 60, 96, 97, 20)
GUISetState(@SW_SHOW, $hGui)
While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $iButton
            ControlSend("[CLASS:Notepad]", "", "[CLASSNN:Edit1]", GUICtrlRead($iInput) & @CR, 1);  flag 1, keys are sent raw.
            GUICtrlSetData($iInput, "")
    EndSwitch
WEnd

[retaly]

any idea?

[BrewManNH]

Why would you want the script to send "^" when there's a 3 in the input box. I'm confused as to what it is you're trying to do.