Текущий архив: 2003.06.30;
Скачать: CL | DM;

Вниз

Оптимизация кода   Найти похожие ветки 

← →
Vihr   (2003-06-18 21:12) [0]

Я новичок в этом деле, поэтому,ПОЖАЛУЙСТА, не смейтесь над моим вопросом, на каждый простой вопрос должен быть и простой ответ
Как можно оптимизировать эту образину:

Form1.Edit2.Text:="Введите число";
Form1.Edit3.Text:="Введите число";
Form1.Edit4.Text:="Введите число";
Form1.Edit5.Text:="Введите число";
Form1.Edit6.Text:="Введите число";
Form1.Edit7.Text:="Введите число";
Form1.Edit8.Text:="Введите число";
Form1.Edit9.Text:="Введите число";
Form1.Edit10.Text:="Введите число";
Form1.Edit11.Text:="Введите число";
Form1.Edit12.Text:="Введите число";
Form1.Edit13.Text:="Введите число";
Form1.Edit14.Text:="Введите число";
Form1.Edit15.Text:="Введите число";
Form1.Edit16.Text:="Введите число";
Form1.Edit17.Text:="Введите число";
Form1.Edit18.Text:="Введите число";
Form1.Edit19.Text:="Введите число";
Form1.Edit20.Text:="Введите число";

---

← →
Palladin ©   (2003-06-18 21:20) [1]

=8|


var
i:integer;
for i:=2 to 20 do
(Form1.FindComponent("Edit"+inttostr(i)) as TEdit).Text:="Введите число";


---

← →
Palladin ©   (2003-06-18 21:21) [2]

только это называется не оптимизировать, а увеличить гибкость алгоритма, твой вариант наиболее быстрый... но и наиболее дубовый...

---

← →
Anatoly Podgoretsky ©   (2003-06-18 21:46) [3]

И самое главное совсем не нужный :-)

---

Страницы: 1 вся ветка

Текущий архив: 2003.06.30;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.01 c