Aadithyaan

CtrlRead not Working

4 posts in this topic

#1 ·  Posted

Hi guys, I got a problem with my script. I inserted an 'input control' and a 'button' for displaying the text (that has been entered in input)

Have a look at this:

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
#include <winapifiles.au3>
#include <Clipboard.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <GuiScrollBars.au3>
#include <ColorConstants.au3>
#include <StaticConstants.au3>
#include <WinAPIGdi.au3>
#include <APIGdiConstants.au3>
#include <ButtonConstants.au3>
#include <array.au3>

;_____________________________________________________________
Opt("GUIOnEventMode", 1) ; Change to OnEvent mode
Opt("GUICloseOnESC", 0) ;1=ESC  closes, 0=ESC won't close
;__________________________________________________________

Global $maingui = GUICreate("myCalculator",500,400,-1,-1)

Global $bcalc = GUICtrlCreateButton("CALCULATE",360,200,100,30)

Global $input1 = GUICtrlCreateInput("",180,50,80,22)

Global $iRead1 = GUICtrlRead($input1)

GUICtrlSetOnEvent($bcalc,"myfunction")

GUISetOnEvent($GUI_EVENT_CLOSE,"sclose")

GUISetState(@SW_SHOW)
While 1
    Sleep(100) ; Sleep to reduce CPU usage
WEnd
;_______________________________________________


func sclose()
    Exit
EndFunc


Func myfunction()
    MsgBox(0,"",$iRead1)
    EndFunc

 

 

So this was the script and on running it, it shows messagebox but with no content. I want to display the text which has been entered in input box. Have you got any idea about this..

I have inserted the ..au3 file with this topic.

Example Script.au3

Share this post


Link to post
Share on other sites



#2 ·  Posted

Hi,

please post your code using the <> in the menu..

Try this:

Global $maingui = GUICreate("myCalculator",500,400,-1,-1)

Global $bcalc = GUICtrlCreateButton("CALCULATE",360,200,100,30)

Global $input1 = GUICtrlCreateInput("",180,50,80,22)

;~ Global $iRead1 = GUICtrlRead($input1)

GUICtrlSetOnEvent($bcalc,"myfunction")

GUISetOnEvent($GUI_EVENT_CLOSE,"sclose")

GUISetState(@SW_SHOW)
While 1
    Sleep(100) ; Sleep to reduce CPU usage
WEnd
;_______________________________________________


func sclose()
    Exit
EndFunc


Func myfunction()
    MsgBox(0,"", GUICtrlRead($input1))
    EndFunc

 

1 person likes this

Share this post


Link to post
Share on other sites

#3 ·  Posted

Thanks for answer and help. It works...

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