Ver Mensaje Individual
  #1  
Antiguo 13-02-2011
Avatar de DarkBlue
DarkBlue DarkBlue is offline
Miembro
 
Registrado: jun 2010
Posts: 105
Reputación: 14
DarkBlue Va por buen camino
Talking deshabilitar componentes a traves de una lista

Hola ahora quisiera saber como desabilitar componentes por medio de una lista ya que ya encontre como desabilitar componentes dependiendo de la clase que sean ...

Código Delphi [-]
Procedure ActDescBotones(Valor:Boolean); 
Var 
i: integer; 
Begin 
for i := ComponentCount - 1 downto 0 do 
begin 
if Components is TButton then 
TButton(Components).Enabled := False; 
end; 
End;

intente modificar el codigo pero me hace falta conocimiento e imaginacion , tengo en un arreglo de string (desabilita) los nombres de los componentes que quiero desabilitar pero no se me ocurre una manera intente algo como esto pero nisiquiera corre jajaja . Ademas que me sorprende eso del IS que es?

Código Delphi [-]

for x:=0 to length(desabilita) do
begin


if inventario.Components[X].Name=desabilita[x] then
TComponent(inventario.Components[x]).Enabled := False;

end;

por su atención gracias
__________________
Todo es Relativo
Responder Con Cita