Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Цикл


Автор: ADanilov 8.9.2004, 14:55
У меня стоит Delphi 7
Я пользуюсь циклом for у меня в нем не работает команда step.
В чем может быть причина и как мне сделать шаг.

Автор: <Spawn> 8.9.2004, 15:17
Код
step := 0; // Начальное значение
while (условие) do
begin
 {тело цикла в котором сам где-то меняшь шаг}
 {например, Inc(step, 2);}
end;

Автор: Ripper 8.9.2004, 15:22
Цитата
For i:=0 to Maximum do if i mod step = 0 then
begin

end; 

Переменная Step и есть нужный шаг

из фака

Автор: dvamaster 8.9.2004, 15:54
Тогда уж так:
Код
i := 0; // Начальное значение
while i<Count do
begin
{тело цикла в котором сам где-то меняшь шаг}
 Inc(i, step)
end;

Автор: Vit 8.9.2004, 16:20
Цитата(ADanilov @ 8.9.2004, 05:55)
Я пользуюсь циклом for у меня в нем не работает команда step.
В чем может быть причина и как мне сделать шаг.



В том что такой конструкции в языке нет и никогда не было. Используй один из вариантов который тебе привели - или While или For+mod

Автор: Pakshin A. S. 8.9.2004, 19:08
Ещё есть repeat until <something happened>;

Автор: Vit 9.9.2004, 06:50
Цитата(Pakshin @ 8.9.2004, 10:08)
Ещё есть repeat until <something happened>;



Не-а! Цикл repeat выполняется минимум 1 раз, а For и While в зависимости от условий могут ни разу не выпорлнятся, нужен именно цикл с предусловием а не постусловием, хотя в частных случаях работать будет.

Автор: rubenhak 9.9.2004, 15:25
Vit - сразу видно преимущество 7074 сообщений smile.gif

Автор: Vit 9.9.2004, 18:47
Цитата(rubenhak @ 9.9.2004, 06:25)
Vit - сразу видно преимущество 7074 сообщений



А это ещё к чему? withstupid.gif

Автор: rubenhak 10.9.2004, 00:31
Цитата

Не-а! Цикл repeat выполняется минимум 1 раз, а For и While  ....


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

вот у меня щас проблемка есть, если сможешь помочь вот скажу молодец -
тема "незнаю точно но скорее COM"

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)