Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Habilitar controles de un GroupBox (https://www.clubdelphi.com/foros/showthread.php?t=50556)

luigi_cr 21-11-2007 18:45:48

Habilitar controles de un GroupBox
 
Hola muy buenas,

Tengo un GroupBox el cual contiene varios controles, botones, TextBox, entre otros, todos estos controles tienen la propiedad Enabled en false, y lo que deseo y no se si es posible es habilitarlos todos los controles es decir, poner la propiedad Enabled a true de todos los controles pero lo quiero hacer de manera que no sea uno por uno, no se si es posible gracias....

jhonny 21-11-2007 18:52:04

Una forma es colocar enabled := True en tiempo de diseño y trabajar unicamente con el enabled del GropBox... de esa manera si en ejecución pones enabled:=True del GroupBox todos sus control seran True y en su defecto si colocas enabled:=False del GroupBox todos seran False.

jhonny 21-11-2007 19:05:48

Bueno, creo que me he apresurado un poco en redactar mi post anterior, asi que explicare un poco el efecto que produce dicha propuesta:

Al modificar la propiedad Enabled del GroupBox estamos inhabilitando o habilitando (según sea) cualquier control que este dentro de él, pero dichos controles no veran afectada su propia propiedad Enabled... para verificar esto que he comentado hice una pequeña forma con este ejemplo y luego de modificar el enabled del GroupBox, hice un ShowMessage de la propiedad enabled de uno de sus controles y no se vio afectada dicha propiedad.

Pero en todo caso si lo que queremos es que dicha propiedad de cada uno de esos controles se vea afectada, para que asi veamos el efecto visual que dicha cuestión produce, podemos hacer lo siguiente:
Código Delphi [-]
var
  i :Integer;
begin
  for i := 0 to GroupBox1.ControlCount-1 do
  begin
    GroupBox1.Controls[i].Enabled := not GroupBox1.Controls[i].Enabled; //<--- O False o True segun tu necesidad...
  end;
end;

Espero que esto sirva de algo :).

luigi_cr 21-11-2007 19:27:51

Gracias funciona perfectamente, hasta puedo limpiar todos los TextBox, muchas gracias de nuevo y por responder tan pronto...
Saludos


La franja horaria es GMT +2. Ahora son las 05:07:20.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi