Delphi: Подскажите пожалуйста по FindComponent

Question

Проблема в следующем, если вставить вот этот код: 
 
for i:=1 to 8 do begin 
 TShape(FindComponent('Shape'+IntToStr(i))).Brush.Color:=clSilver; 
end; 
 
в процедуру кнопки, то всё работает, но если его вставить в обычную процедуру, то выдаёт ошибку. 
В чём дело, почему с обычной процедурой не работает? Может к ней надо что дописать? 
Заранее благодарю.

Метрозацепер, спасибо!

Любовь Саверская · Accepted Answer

Наверное, надо куда-то поставить "Form1." или "TForm1." 
 
Скорее всего, 
TShape(Form1.FindComponent('Shape'+IntToStr(i))).Brush.Color:=clSilver;