[Nyctos Kasignete]

А так попробуйте.

Код:

(Components[i] as TLabel).Caption:='0';