Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
3-97473
alex_bredin
2003-06-04 16:32
2003.06.30
Значение переменной в QReport


14-97846
Nik8.
2003-06-12 22:57
2003.06.30
кто знает где здесь ошибка


1-97652
VIB
2003-06-19 09:55
2003.06.30
Масивы в Delphi


1-97589
Bagroff
2003-06-18 19:19
2003.06.30
Дин. двумерный массив.


4-97917
postx
2003-04-27 17:26
2003.06.30
Каким образом можно создать меню в уже созданном окне?




   Наверх