mire los codigos que envaste y me pregunto si es posible que se modifique este
Código Delphi
[-]
procedure TForm1.SetControlEnable(TheControls: array of TWinControl; Value: Boolean);
var
i : Integer;
begin
for i := 0 to High(TheControls) do
SetControlEnable(TheControls[i], Value);
end;
procedure TForm1.SetControlEnable(TheControl: TWinControl; Value: Boolean);
var
i : integer;
begin
for i := 0 to TheControl.ControlCount - 1 do
begin
if TheControl.Controls[i] is TWinControl then
SetControlEnable(TWinControl(TheControl.Controls[i]), Value)
else
TheControl.Controls[i].Enabled := Value;
end;
TheControl.Enabled := Value;
end;
con la finalidad de que pueda ser usado antecediendo un control padre como el Panel y poder usarlo para varar no solo la propiedad enabled sino quizas color o incluso el saber si existe un control vacio, creo esta seria la mejor manera de simplificar todo, controle un determinado grupo de controles, que tenga la faclidad de controlar su estado enabled y otras caracteristicas y que pudiera controlar todos los tipos de controles como son (edits,listbox,combobox y buttons). quien puede echarme la mano con esto jajajajajajajjajajajaaj