CPP_RAD_Ejercicio42

/* ej42_RadioButtons
Ejemplo del control RadioButton */
#include <radc++.h>

Form        form1("Verificaciones - RAD C++ Ejemplo");

RadioButton radio1("Boton Radio 1 - seleccioname", AUTO_ID,100,100,200,20,form1);
RadioButton radio2("Boton Radio 2 - seleccioname", AUTO_ID,100,130,200,20,form1);

FormProcedure proc(FormProcArgs) {
    ON_CLOSE() Application.close();

    ON_RADIO_EVENT(radio1)
        form1.caption = radio1.selected ? radio1.caption : radio2.caption;

    ON_RADIO_EVENT(radio2)
        form1.caption = radio2.selected ? radio2.caption : radio1.caption;

    return 0;
}

rad_main()

    form1.procedure = proc;

rad_end()