Fórum Desabiltar menus e botoes do ToolBar #230685

Caras, tenho um form MDI que possui um ToolBar e preciso desabiltar os botoes integrantes deste ToolBar. Usei o seguinte código:

For c := 0 To Self.ComponentCount - 1 Do
begin
If (Components[c].ClassName = ´TMenuItem´)Then
begin
If(Components[c].Tag = 1) Then
TMenuItem(Components[c]).Enabled := False;
end;

If(Components[c].Tag = 1)Then
TControl(Components[c]).Enabled := False;
End;

Isso serve para desabilitar menus (através da classe e verificando a propriedade Tag) e botoes do ToolBar (verificando a propriedade Tag).Dessa forma ocorre que ou executa o procedimento para desabilitar os menus ou os botões. Mas o que eu quero é desbilitar todos.
Como eu posso fazer isso?

Valeu!!!