[Parsec]

Hola,

gracias por contestar, he probado con el siguiente código (sacado del hilo que me has puesto), pero no funciona.

Código Delphi [-]
for i := 1 to 10 do
      begin
         If i=k then
           TToolButton(FindComponent('ToolButton'+IntToStr(i))).Enabled:=True

          else
          TToolButton(FindComponent('ToolButton'+IntToStr(i))).Enabled:=False;
      end;

Los ToolButton no se deshabilitan, ¿que puede pasar?

Saludos