Jump to content

Required Fields


Jaboowaki
 Share

Recommended Posts

I created a GUI and need the fields to be required responses before accepting the OK button.

#include <ButtonConstants.au3>

#include <EditConstants.au3>

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

#include <WindowsConstants.au3>

#Region ###

$Form1 = GUICreate("ISPF", 235, 155, 568, 323)

$Label1 = GUICtrlCreateLabel("ISPF Number", 16, 48, 67, 17)

$Input1 = GUICtrlCreateInput("", 88, 48, 129, 21)

$Label2 = GUICtrlCreateLabel("Name", 48, 80, 32, 17)

$Input2 = GUICtrlCreateInput("", 88, 80, 129, 21)

$Button1 = GUICtrlCreateButton("OK", 24, 112, 81, 25, $WS_GROUP)

$Button2 = GUICtrlCreateButton("CANCEL", 128, 112, 81, 25, $WS_GROUP)

GUISetState(@SW_SHOW)

#EndRegion ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

EndSwitch

WEnd

Link to comment
Share on other sites

  • Moderators

Jaboowaki,

In the code which you will run when the "OK" button is pressed, just use GUICtrlRead on the 2 inputs and only process if neither is empty. ;)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

My solution would be:

If one or both of the input fields are empty then the OK button is disabled (greyed out):

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

#region ###
$Form1 = GUICreate("ISPF", 235, 155, 568, 323)
$Label1 = GUICtrlCreateLabel("ISPF Number", 16, 48, 67, 17)
$Input1 = GUICtrlCreateInput("", 88, 48, 129, 21)
$Label2 = GUICtrlCreateLabel("Name", 48, 80, 32, 17)
$Input2 = GUICtrlCreateInput("", 88, 80, 129, 21)
$Button1 = GUICtrlCreateButton("OK", 24, 112, 81, 25, $WS_GROUP)
GUICtrlSetState(-1, $GUI_DISABLE)
$Button2 = GUICtrlCreateButton("CANCEL", 128, 112, 81, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#endregion ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE, $Button2
            Exit
        Case $Input1, $Input2
            $sInput1 = GUICtrlRead($Input1)
            $sInput2 = GUICtrlRead($Input2)
            If $sInput1 <> "" And $sInput2 <> "" Then
                GUICtrlSetState($Button1, $GUI_ENABLE)
            Else
                GUICtrlSetState($Button1, $GUI_DISABLE)
            EndIf
    EndSwitch
WEnd

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
Share on other sites

  • 1 year later...

Oh, I'm glad my solution solved a problem for you too :D

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...