Compartir a través de


Establecer propiedades de botones de opción

Para ajustar manualmente los elementos individuales de un grupo de botones de opción o de botones de comando en el Diseñador de formularios, elija Modificar en el menú contextual del grupo.

Es posible establecer propiedades de botones individuales en la ventana Propiedades. También puede establecer estas propiedades en tiempo de ejecución si especifica el nombre del botón de opción y el valor deseado de la propiedad. Por ejemplo, la línea de código siguiente, incluida en el código de evento o método de algún objeto del mismo formulario que el grupo de botones de opción, establece el título de optCust en el grupo de botones de opción opgChoices:

THISFORM.opgChoices.optCust.Caption = "Sort by Customer"

También puede establecer estas propiedades en tiempo de ejecución con la propiedad Buttons y especificando el número de índice del botón de opción en el grupo. Por ejemplo, si optCust es el tercer botón del grupo, la línea de código siguiente establecerá el título de optCust:

THISFORM.opgChoices.Buttons(3).Caption = "Sort by Customer"

Para establecer propiedades en todos los botones de un grupo

  • Utilice el método SetAll del grupo.

    Por ejemplo, la línea de código siguiente deshabilita todos los botones de un grupo de botones de opción llamado opgMyGroup en un formulario:

    THISFORM.opgMyGroup.SetAll("Enabled",.F., "OptionButton")
    

Habilitar y deshabilitar botones de un grupo

El ejemplo anterior muestra cómo deshabilitar por medio de programación todos los botones de opción de un grupo. Cuando los botones están deshabilitados, se muestran en los colores especificados en las propiedades DisabledForeColor y DisabledBackColor de los botones de opción. También puede establecer la propiedad Enabled del grupo de botones de opción en falso (.F.) para deshabilitar el grupo; sin embargo, ya no habrá ninguna pista visual para el usuario.

Determinar el botón de opción seleccionado actualmente

La propiedad Value del grupo de botones de opción permite determinar el botón de opción que está seleccionado en el grupo. Si el origen de control para el botón es numérico, tiene cinco botones de opción en un grupo. Si el tercer botón está seleccionado, la propiedad Value del grupo de botones de opción será 3. Si ningún botón de opción está seleccionado, la propiedad Value del grupo será 0.

También puede determinar el título del botón de opción seleccionado con las propiedades Value y Buttons del grupo. Por ejemplo, la línea de código siguiente almacena en una variable cSelected la propiedad Caption del botón de opción seleccionado.

oGroup = THISFORM.opg1
cSelected = oGroup.Buttons(oGroup.Value).Caption

Filtrar listas con botones de opción

Si tiene un pequeño grupo de filtros de tabla predeterminados, puede usar botones de opción para permitir al usuario cambiar entre los filtros.

El ejemplo siguiente utiliza un formulario con un cuadro de lista (lstCustomers) y un grupo de botones de opción que contiene tres botones de opción.

Valores de las propiedades del cuadro de lista

Objeto Propiedad Valor
LstCustomers RowSourceType 2 - Alias
LstCustomers RowSource Customer

Los filtros se establecen en el código del evento Click de los botones de opción.

Código de evento para filtrar una lista cuando el usuario elige un botón de opción

Objeto Evento Código
OptAll Click
SET FILTER TO
GO TOP
THISFORM.lstCustomers.Requery
OptCanada Click
SET FILTER TO customer.country = "Canada"
GO TOP
THISFORM.lstCustomers.Requery
OptUK Click
SET FILTER TO customer.country = "UK"
GO TOP
THISFORM.lstCustomers.Requery

Cuando el usuario cierre el formulario, no olvide restablecer el filtro incluyendo SET FILTER TO en el evento Click del botón de cierre o en el evento Destroy.

Sugerencia   Para actualizar una lista cuando el origen de la lista puede haber cambiado, utilice el método Requery.

Vea también

Establecer el número de botones de opción en un grupo de opciones | Almacenar opciones de usuario en una tabla mediante los botones de opción | Usar controles | Controles y objetos | Diseñador de formularios