Cita:
Empezado por kryna
tengo 1radiogroup llamado rgservicios cuando este es 0.. me activa un combobox llamado comboemergencia....
[...]
Si rgservicios es 1 activa un combobox llamado combocomple que a su vez tiene algunas opciones para la seleccion.
Si rgservicios es 2 activa un combobox llamado combocombo que a su vez tiene algunas opciones para la seleccion
|
Según entiendo de lo que describes, cada uno de los tres combos estará activo sólo si la correspondiente opción del RadioGroup está seleccionada.
Entonces no entiendo por qué quieres juntar todas las comprobaciones en un sólo lugar.
Tal como veo las cosas tienes que manejar un
case en el evento OnClick del RadioGroup:
Código Delphi
[-]
case rgservicios.ItemIndex of
0:
1:
2:
end;
y manejas las opciones de cada combo en su correspondiente evento OnChange:
Código Delphi
[-]
procedure comboemergenciaChange(Sender: TObject);
begin
case comboemergencia.ItemIndex of
0:
1:
...
6:
end;
end;
Código Delphi
[-]
procedure combocompleChange(Sender: TObject);
begin
case combocomple.ItemIndex of
0:
1:
...
9:
end;
end;
Código Delphi
[-]
procedure combocomboChange(Sender: TObject);
begin
case combocombo.ItemIndex of
0:
1:
...
15:
end;
end;
en comboEmergenciaChange abarcas las opciones de tu primer bloque pues si se entra a este evento es porque rgservicios.ItemIndex = 0, en combocomple abarcas las opciones de tu segundo bloque pues si se entra a este evento es porque rgservicios.ItemIndex = 1 y en combocomboChange abarcas las opciones de tu tercer bloque pues si se entra a este evento es porque rgservicios.ItemIndex = 2.
// Saludos