Здравствуйте, уважаемые программисты!
Недавно собрался написать программку... Написал. Заняла оооочень много места. Решил сократить - не получается...
Помогите, пожалуйста!
Как сократить вот енту штуку:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Edit1.Clear;
Form1.Edit2.Clear;
Form1.Edit3.Clear;
Form1.Edit4.Clear;
Form1.Edit5.Clear;
Form1.Edit6.Clear;
Form1.Edit7.Clear;
Form1.Edit8.Clear;
Form1.Edit9.Clear;
Form1.Edit10.Clear;
Form1.Edit11.Clear;
Form1.Edit12.Clear;
Form1.Edit13.Clear;
Form1.Edit14.Clear;
Form1.Edit15.Clear;
Form1.Edit16.Clear;
Form1.Edit17.Clear;
Form1.Edit18.Clear;
end;
Admin: Пользуемся тегами!
Это, естественно, для примера.
Можно ли загнать этот процесс "очищения" в цикл? А если можно - то как? Просто написать
for i:= 1 to 18 do
Form1.EditI.Clear;
Не получается...
Помогите, пожалуйста!
Заранее спасибо.