Возник вопрос, как обращаться к несколько объектам (одного класса) зная их имена, но не описывая каждый отдельно. Имеется ввиду, что есть несколько объектов, к примеру штук 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;
Кто подскажет какие еще есть способы?