Extended Input Box (multiple inputs)

[Jefrey]

Taking the idea from @Melba23's (btw, thanks  ) ExtMsgBox and also making use of his StringSize UDF, I made a extended version of the InputBox function.

From the README file:

This UDF creates input boxes (just like native InputBox), but with multiple inputs.

You can also set some inputs to be password-style, set the default texts for some of the edits and even set the label of the OK/cancel buttons.

How to use

_ExtInputBox($sTitle, $sTexts [ , $sDefaults = Null [ , $sPasswords = Null [ , $sBtnLabels = "OK|Cancel" [ , $iWidth = -1 [ , $iLeft = -1 [ , $iTop = -1 [ , $iTimeout = 0 [ , $hParent = 0 ] ] ] ] ] ] ] ] )

Arguments are:

• $sTitle (mandatory): The window title (e.g.: "Hello World")
• $sTexts (mandatory): The edit labels, separated by | (e.g.: "Your email|Your password")
• $sDefaults: The default input texts, separated by | (e.g.: "|you@us.com||" will tell that the first input will have nothing as default text, the second will have you@us.com as default text and the third and forth will also have nothing). Note that if you set the default value of 1 input, you must set the value of them all (even if it's nothing), otherwise all inputs will have no default value. Default is none.
• $sPasswords: One or more 1-based index of inputs, separated by anything that is not a number (pipeline - | - recommended), of the inputs that will receive password style (e.g.: "2|3" wíll tell that the second and third inputs are password-style, default is none)
• $sBtnLabels: The TWO label of the default OK/Cancel buttons (e.g.: "Submit|Close")
• $iWidth: Window width (default is the size of the longest string with the limit of 25% of the screen width). Obviously it's not possible to set the height as it's calculated automatically.
• $iLeft: Distance of the window from the left side of the screen (default is centered)
• $iTop: Distance of the window to the top of the screen (default is centered)
• $iTimeout: Time limit for filling the form data (default is none)
• $hParent: Parent form (default is none)

 

Return value

Sucess: an 1-based array with the input values entered ($aArray[1] = 1st input value, $aArray[2] = 2nd input value, $aArray[n] = nth input value, whereas $aArray[0] = input count)

Failure: False, and set @extended to 1 if the user clicked cancel, 2 if the user closed the window, or 3 if timeout ended.

 

Examples (two of them)

 

 

 

#include 'ExtInputBox.au3'

$sData = _ExtInputBox("Login", "Username|Password", Null, "2")

If $sData = False Then
   MsgBox(0, "", "You pressed cancel, exit or timeout ended.")
Else
   MsgBox(0, "You entered:", "Username: " & $sData[1] & @CRLF & "Password: " & $sData[2])
EndIf

#include 'ExtInputBox.au3'

$sData = _ExtInputBox("Login", "Your full name|Your email|Your telephone|Choose an username|Choose a password|Repeat password", "Mr./Ms. ||+1 |admin||", "5,6", "Register|Cancel")

If $sData = False Then
   Switch @extended
      Case 1
         MsgBox(0, "", "You clicked Cancel")
      Case 2
         MsgBox(0, "", "You closed the window.")
      Case 3
         MsgBox(0, "", "Timeout ended (but we have no timeout on this example, so this will never happen)")
   EndSwitch
Else
   MsgBox(0, "You entered:", "Full name: " & $sData[1] & @CRLF & _
             "Email: " & $sData[2] & @CRLF & _
             "Telephone:" & $sData[3] & @CRLF & _
             "Username: " & $sData[4] & @CRLF & _
             "Password: " & $sData[5] & @CRLF & _
             "Password repeat: " & $sData[6])
EndIf

 

Download

 

Download ZIP from GitHub

 

Btw, fork me on Github

 

[TheSaint]

Very good.

Thanks for sharing!

[emendelson]

@Jefrey - This is an excellent script. Thank you! One request to you or to anyone else who might know the answer:

Is it possible to make the Enter key have the same effect as clicking OK? With the script where I hope to use this input box, the user will normally accept the defaults, and it seems intuitive to press Enter. Is there an easy way to make the script allow this?

Thank you again!

[emendelson]

To answer my own question, I've made some very slight modifications to this excellent code. I've added a parameter that lets you specify the OK or Cancel button as the default (so the user can press Enter instead of clicking on the button) and also added some spacing between the fields and buttons and the dialog border. Here's the fork, with thanks to Jefrey:

https://github.com/emendelson/extinputbox_au3

 

Edited March 8, 2020 by emendelson

[TripScott]

how can I use a variable as a default? 

I am parsing data I copied & would like that to be in the input-box. when I try 

  Quote

$sData = _ExtInputBox("Entry", "First Name|Last Name|Date ymd|State|City|Media Type", || $sYear||$sCity, "Ok|Cancel")

If $sData = False Then
 ...
Else
   MsgBox(0, "You entered:", "First name: " & $sData[1] & @CRLF & _
             "Last Name: " & $sData[2] & @CRLF & _
             "Date:" & $sData[3] & @CRLF & _
             "State: " & $sData[4] & @CRLF & _
             "City: " & $sData[5] & @CRLF & _
             "Media Type: " & $sData[6])
EndIf

 

Expand  

I receive an  error. Looks like the defaults need to be in quotes, however that doesn't work with variables. What am I doing wrong?

 

Thanks,

 

Kristine

[abberration]

Looks like you are missing the parameter for the number of input boxes.

 

[dersiniar]

  On 5/26/2020 at 11:18 PM, TripScott said:

how can I use a variable as a default? 

I am parsing data I copied & would like that to be in the input-box. when I try 

I receive an  error. Looks like the defaults need to be in quotes, however that doesn't work with variables. What am I doing wrong?

 

Thanks,

 

Kristine

Expand  

I know its old post, But since I started to use this my self and I had same problem. But I figured it out. And i want to help others out who might have the same question.
Use variables like this. Its working for me 

$sData = _ExtInputBox("Settings", "markup.|Extra days|Auto Update every x minutes|Where to save|Insert url to file|Enter your name|", $Add&"|"&$ExtraDays&"|"&$minutes&"|"&$drive&"|"&$Url&"|"&$UserRAW&"|", "Save|Cancel")