Вниз
Скачать: 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.01 c
14-97822
msgipss
2003-06-11 15:16
2003.06.30
Умная инсталяция или установка набора файлов в ресурсы программы


8-97748
arcad
2003-03-15 11:02
2003.06.30
Свойства AVI.


14-97795
Juster~
2003-06-14 20:17
2003.06.30
Время выполнения


6-97760
BoTToN!k
2003-04-24 14:06
2003.06.30
отправить мыло


1-97715
Saniok
2003-06-17 01:04
2003.06.30
Как указать полный путь к bpl-ке, которая в requires другой bpl-к




   Наверх