CPP_RAD_Ejercicio34

/* ej34_ComboBox
Ejemplo de control ComboBox */
#include <radc++.h>

Form Form1("Combo Box ejemplo - RAD C++ Ejemplo");
ComboBox combo("", AUTO_ID, 10, 15, 100, 200, Form1);//create new combo box

Button btn_add("<   Agregar esto   <", AUTO_ID, 120, 15, 100, 25, Form1);
TextBox txt_newval("Nuevo valor", AUTO_ID, 230, 15, 150, 25, Form1);

Label   label("Entrada Seleccionada", AUTO_ID, 120, 45, 260, 15, Form1);
ReadOnlyBox txt_selected("", AUTO_ID, 120, 60, 260, 25, Form1);

Button btn_remove("[ X ] Remover seleccion", AUTO_ID, 120,130, 260, 25, Form1);
Button btn_select("Progmaticamente seleccionar item 2", AUTO_ID, 120,160, 260, 25, Form1);

FormProcedure procedure1 (FormProcArgs); //prototype of form procedure

rad_main()

        //attach form procedure
        Form1.procedure = procedure1;

        //add some enteries to combobox
        combo.add("entrada 1");
        combo.add("entrada 2");
        combo.add("entrada 3");
        combo.select(0); //select first entry

rad_end()

FormProcedure procedure1 (FormProcArgs) { //implementation of form procedure

        ON_CLOSE() {
            //exit application
            Application.close();
        }
        //when an item is selected, put its text in textbox txt_selected
        ON_ITEMSELECT(combo) {
            txt_selected.text = combo[combo.selectedItemIndex];
        }
        ON_COMMAND_BY(btn_add) {
            //add new value of textbox txt_newval ot combobox
            combo.add(txt_newval.text);
        }
        ON_COMMAND_BY(btn_remove) {
            //remove selected item in combobox
            combo.remove(combo.selectedItemIndex);
        }
        ON_COMMAND_BY(btn_select) {
            //remove selected item in combobox
            combo.select(1); //1 means item 2, items have ZERO based indeses
        }
        return 0;
}