Jump to content

How to insert multiple select box data into an edit box


Recommended Posts

Hello everyone,

I am trying to build a help file which helps generate codes instead of typing them on our system.

I am still new here and need your help, I would like to insert multiple select box data into a read only select box.

the $select box has different values 

View availabiliy & restrictions = VRM

so I want VRM to display on the edit box, if he select a day and a month then

VRM/01MAR

etc

This is what I have designed for now:

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### 
$Form1_1 = GUICreate("Form1", 979, 531, 192, 206)
$MenuItem3 = GUICtrlCreateMenu("&File")
$MenuItem2 = GUICtrlCreateMenu("&Settings")
$MenuItem1 = GUICtrlCreateMenu("&Help")
$List1 = GUICtrlCreateList("", 80, 72, 457, 97)
$select = GUICtrlSetData(-1, "View availabiliy & restrictions|View availabiliy & restrictions by rate program|View availabiliy & restrictions by rate type|View availabiliy & restrictions by room pool|View property"&Chr(39)&"s room pools & counts|View rate programs & rates|View rate programs & rates by room pool|View rate programs & rates by type & rate program name|View room pool descriptions")
$Label1 = GUICtrlCreateLabel("Select an Action", 80, 48, 82, 17)
$day = GUICtrlCreateCombo("day", 80, 208, 121, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "|01|02|03|04|05|06|07|08|09|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31")
$Label2 = GUICtrlCreateLabel("Select a day", 80, 184, 63, 17)
$month = GUICtrlCreateCombo("month", 216, 208, 121, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "|JAN|FEB|MAR|APR|MAY|JUN|JUL|AUG|SEP|OCT|NOV|DEC")
$Label3 = GUICtrlCreateLabel("Select a month", 216, 184, 75, 17)
$Label4 = GUICtrlCreateLabel("Generated code", 80, 240, 95, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Button1 = GUICtrlCreateButton("Copy", 80, 408, 145, 33)
$Button2 = GUICtrlCreateButton("Generate Code", 236, 408, 145, 33)
$Button3 = GUICtrlCreateButton("Exit", 392, 408, 145, 33)
$generate = GUICtrlRead($select)
Global $Edit1 = GUICtrlCreateEdit("", 104, 40, 281, 129)
GUICtrlSetData(-1, "Edit1")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button2
            ControlSetText("Form1", "", )


    EndSwitch
WEnd

 

You help would be appreciated. Thank you

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
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...