Возник вопрос, как обращаться к несколько объектам (одного класса) зная их имена, но не описывая каждый отдельно. Имеется ввиду, что есть несколько объектов, к примеру штук 5 Edit и нужно все их очистить. Но не прописывая обращение к каждому а скажем одним циклом. 
 Все что смог придумать это сначала создать массив указателей на эти объекты, а потом в цикли обращаться к нему. 
 Code
var 
         i:integer; 
         Edits:array[1..4] of ^TEdit; 
 begin 
         Edits[1]:=@Edit1; 
         Edits[2]:=@Edit2; 
         Edits[3]:=@Edit3; 
         Edits[4]:=@Edit4; 
         for i:=1 to 4 do 
         Edits[i].Text:='0'; 
 end;
  
 Кто подскажет какие еще есть способы?