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

Вниз

Уточнение по работе цикла for   Найти похожие ветки 

 
Илья_   (2009-01-19 20:07) [0]

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

var
 I, Len: Integer;
begin
 Len := 10;

 for I := 0 to Len - 1 do
 begin
   ...
   Len := 5; {сдесь можно присвоить любое значение}
   ...
 end;

Интересно, что цикл выполнится 10 раз несмотря на то,
что Len была изменена. Почему? Я думаю он вычисляет
Len - 1 один раз и запоминает это значение. Что скажете.


 
{RASkov} ©   (2009-01-19 20:22) [1]

Нечего тут говорить... Это все в справке должно быть написано...


 
{RASkov} ©   (2009-01-19 20:24) [2]

:)
и написано ведь....
For purposes of controlling execution of the loop, the expressions initialValue and finalValue are evaluated only once, before the loop begins.
...только что посмотрел)


 
Илья_   (2009-01-19 20:30) [3]

Спасибо! А я что-то не нашёл этого текста.


 
KSergey ©   (2009-01-20 06:21) [4]

Если хотим менять количество итераций - в дельфи надо использовть какой-нибудь другой цикл (while/repeat или даже goto :) )



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

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

Наверх




Память: 0.44 MB
Время: 0.005 c
2-1232376076
grav
2009-01-19 17:41
2009.03.01
Транзакции


2-1231928496
СержК
2009-01-14 13:21
2009.03.01
Не получается отобразить картинку в компонетте: Image


2-1232105508
lod
2009-01-16 14:31
2009.03.01
Подключение к ftp серверу.


4-1205939486
Vask
2008-03-19 18:11
2009.03.01
Как настроить рабочий стол через Delphi?


15-1230897293
Nic
2009-01-02 14:54
2009.03.01
Антивирусный марш





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский