Duvida sobre componente do Form

Eu tenho um form com 100 botoes iguais. Eu quero mudar a cor da fonte de todos eles e faco:

Botao001.Font.Color := clGreen;
Botao002.Font.Color := clGreen;
Botao003.Font.Color := clGreen;
...
...
...
Botao098.Font.Color := clGreen;
Botao099.Font.Color := clGreen;
Botao100.Font.Color := clGreen;

Como e´ que eu faria para fazer a mesma coisa usando um laço:
no clipper eu usava macrosubstituicao:

for i = 1 to 100
j := StrZero(,i,3)
Botao&j. := ...
end

em Delphi me parece que se usa:´Componente´:
exemplo:

C: TComponent;
for i := 0 to Form1.ComponentCount - 1 do begin

C := Form1.Components[i].Font.Color := clGreen;

end;

Porem nao funciona... Qual seria a solucao para meu fonte nao ficar com tantas linhas (quase iguais)..

Diante mao ja´ agradeco as ajudas.