Loop back and keep data

[Jackized]

Is there a way to loop back to the beginning and keep the already entered data in the GUI Input boxes? I can GUIDelete and start a new GUI but all the typed data has to be redone. Here is a sample.

 

expandcollapse popup

#Include <GuiConstants.au3>

Dim $msg,$okbutton,$cancelbutton,$objOU,$intAccValue,$strGroup1,$strGroup2
Dim $strFirstName,$strLastName,$strUserName,$strUserName2,$strPassword,$strDescription,$strContainer
Dim $Combo,$Duration


Do

$Form1 = GuiCreate("", 300, 300)
         GUISetBkColor(0xA6CAF0)

        GuiCtrlCreateLabel("First Name:", 50, 10)
        $strFirstName = GuiCtrlCreateInput("", 50, 25, 200, 20)

        GUICtrlSetState ( $okbutton, $GUI_FOCUS )
        GuiSetState()

    $okbutton = GUICtrlCreateButton ("OK",75,240,50,20)
    $cancelbutton = GUICtrlCreateButton ("Cancel",175,240,50,20)

While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE Or $msg = $cancelbutton
            Exit
    Case $msg = $okbutton
            $strFirstName = GUICtrlRead($strFirstName)
            ExitLoop
    EndSelect
Wend


$len = StringLen($strFirstName)

    If $len > "20" then
        MsgBox(0, "ERROR Name to long", $strFirstName & " can't be over 20 characters." & @CRLF & "Total: " & $len)
        ;Exit
        GUIDelete($Form1)
    EndIf

Until $len < "20"

MsgBox(0, "Done", "")

 

Edited November 9, 2018 by Jos
added codebox

[careca]

REad the input to a variable..

[Nine]

expandcollapse popup

#Include <GuiConstants.au3>

Dim $msg,$okbutton,$cancelbutton,$objOU,$intAccValue,$strGroup1,$strGroup2
Dim $strFirstName,$strLastName,$strUserName,$strUserName2,$strPassword,$strDescription,$strContainer
Dim $Combo,$Duration



  $Form1 = GuiCreate("", 300, 300)
         GUISetBkColor(0xA6CAF0)

        GuiCtrlCreateLabel("First Name:", 50, 10)
        $strFirstName = GuiCtrlCreateInput("", 50, 25, 200, 20)

    $okbutton = GUICtrlCreateButton ("OK",75,240,50,20)
    $cancelbutton = GUICtrlCreateButton ("Cancel",175,240,50,20)

        GUICtrlSetState ( $okbutton, $GUI_FOCUS )
        GuiSetState()


While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE Or $msg = $cancelbutton
            Exit
    Case $msg = $okbutton
            $strFirstName = GUICtrlRead($strFirstName)
         $len = StringLen($strFirstName)

        If $len < "20" then ExitLoop
        MsgBox(0, "ERROR Name to long", $strFirstName & " can't be over 20 characters." & @CRLF & "Total: " & $len)
    EndSelect
Wend


MsgBox(0, "Done", "")

 

[careca]

There, the OP doesn't even have to try.

[Nine]

  On 11/9/2018 at 9:02 PM, careca said:

There, the OP doesn't even have to try.

Expand  

ya and ty

"REad the input to a variable.."

was sooo helpful !

Edited November 10, 2018 by Nine

[JLogan3o13]

  On 11/10/2018 at 1:49 AM, Nine said:

ya and ty

"REad the input to a variable.."

was sooo helpful !

Expand  

Since this forum operates on the "Teach a Man to Fish" motto rather than simply barfing up code without any explanation for a new coder, neither was terribly helpful. Rather than responding to every last jibe, how about focusing on helping people improve their coding abilities rather than spoon-feeding them, as I assume that is why you're here.

[careca]

You're correct, sadly i had my child on my lap, she was messing with the keyboard and that was the only thing i could write at the moment.

I wanted to add more to my answer, but when i came back to edit there was no longer need for it.