Sign in to follow this  
Followers 0
Guest AX5

MsgBox display in $Input1 ?

5 posts in this topic

How do i make the MsgBox display in $Input1 ?

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Coordinater ", 189, 105, 295, 205)
$Input1 = GUICtrlCreateInput("Mouse Position X,Y", 48, 56, 98, 21)
$Label1 = GUICtrlCreateLabel("Press the key C to display mouse position", 42, 20, 120, 25)
$Pic1 = GUICtrlCreatePic("", 8, 0, 161, 89, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

HotKeySet("c","jPos")

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
    Case $Input1
             jPos()


EndSwitch
WEnd
    Func jPos()
    $jPos = MouseGetPos()
        MsgBox(0, "Mouse  Position X,Y:", $jPos[0] & "," & $jPos[1]) ; $jPos[0] is x co-ordinate and $jPos[1] is Y co-ordinate
EndFunc

Share this post


Link to post
Share on other sites



Use

GUICtrlSetData($Input1,"Mouse Position X,Y: " & $jPos[0] & "," & $jPos[1])
to replace the MsgBox statement.


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

De rien.

Glad to be of service :D


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

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