Hay algo que no entendí ...¿recorrer un objeto TAction?
Yo lo que uso es un TActionList, que si puedo recorrer asi:
Código Delphi
[-]
for i:=0 to miActionList.ActionCount -1 do
miActionList.Actions[i].Enabled := (miActionList.Actions[i].Tag = 1);
o puedes recorrer los componentes de tu formulario para buscar los objetos TAction para habilitarlos si procede:
Código Delphi
[-]
for i:=0 to Form1.ComponentCount -1 do
begin
if (Form1.Components[i] is TAction) then
TAction(Form1.Components[i]).Enabled := (Form1.Components[i].Tag = 1);
end;