Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.10;
Скачать: CL | DM;

Вниз

Вопрос о неоднородности скорости работы цикла   Найти похожие ветки 

 
R   (2003-02-27 09:34) [0]

Мастера вопрос такого плана есть цикл
For I:=0 To N Do begin
------
Sum:=Sum+StrToFloat(Memo1.Lines[I]);
Application.ProcessMessages
end;
Так вот вопрос я заметил что скорость выполнения цикла снижается при приближении к N/2 т.е. к середине цикла а затем от середины
до конца цикла снова возрастает. Почему это происходит ведь
команды находящиеся в теле цикла не меняются. И выполнение должно идти равномерно.


 
Digitman ©   (2003-02-27 09:52) [1]

Скорей всего, это связано с логикой работы метода, который вызывается при обращении к св-ву Memo1.Lines[]


 
REA ©   (2003-02-27 10:22) [2]

Если ты хочешь добиться скорости от вычислений, нужно убрать обработку сообщений из цикла.


 
Anatoly Podgoretsky ©   (2003-02-27 10:25) [3]

Не надо убирать, это практически не увеличивает время, правда и нужды в нем тоже нет, поскольку операция проходит практически сгновенно (Win9х/TMemo)


 
han_malign ©   (2003-02-27 10:43) [4]

Cамая длительная операция в цикле StrToFloat и его время выполнения сильно зависит от значения...


 
REA ©   (2003-02-27 10:47) [5]

Я почему то использую TextToFloat(p, e, fvExtended). Наверно быстрее.


 
han_malign ©   (2003-02-27 11:37) [6]

2 REA © (27.02.03 10:47)
SysUtils:
function StrToFloat(const S: string): Extended;
begin
if not TextToFloat(PChar(S), Result, fvExtended) then
ConvertErrorFmt(@SInvalidFloat, [S]);
end;

- реализацию TextToFloat можно посмотреть в ffmt.asm, мне разбираться влом...


 
Dms   (2003-02-27 11:41) [7]

Скорее всего, свойство .Lines[i] вызывает метод, в котором реализован какой-то тип поиска ... Возможно поиск идет с концов к середине, поэтому скорость и понижается.


 
R   (2003-02-28 01:52) [8]

Спасибо за ответы.



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

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

Наверх




Память: 0.48 MB
Время: 0.018 c
14-30007
Zhenka
2003-02-19 05:48
2003.03.10
Лич но я долго смеялся над автором вопроса, :)))))


3-29729
F1
2003-02-19 11:05
2003.03.10
AV при ADOQuery.ExecSQL


4-30192
Adolf
2003-01-18 14:28
2003.03.10
ShellAPI


7-30143
ychnic
2003-01-10 15:25
2003.03.10
Компонент


7-30154
SeF
2003-01-13 03:39
2003.03.10
завершение процесса