Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.02.17;
Скачать: [xml.tar.bz2];

Вниз

Как пропустить выполнение цикла верхнего уровня?   Найти похожие ветки 

 
asdfa   (2008-01-25 16:30) [0]

Всем доброго времени суток.
Есть:
for i := 0 to cnt do
begin
  ...
  if chto-to
  for j := 0 to cnt2 do
  begin
     if chto-to2 nado пропустить выполнение цикла с i

Как это сделать?


 
Семеныч   (2008-01-25 16:36) [1]


for i := 0 to cnt do
begin
 if chto-to
 begin
   for j := 0 to cnt2 do
   begin
     if chto-to2
       Break;
   end;
   if chto-to2
     Break;
 end;
end;


 
Kolan ©   (2008-01-25 16:40) [2]

Две процедуры выделить надо:

function SubCicle: Boolean;
begin
 for j := 0 to cnt2 do
 begin
    Result := chto-to2 nado пропустить выполнение цикла с i
 end;
end

procedure TopCicle;
begin
 for i := 0 to cnt do
 begin
   if chto-to and SubCicle then
     &#133    
end;


 
Игорь Шевченко ©   (2008-01-25 16:42) [3]


>     if chto-to2 nado пропустить выполнение цикла с i


выйти из цикла или пропустить итерацию ?


 
asdf ©   (2008-01-25 16:44) [4]


> Игорь Шевченко ©   (25.01.08 16:42) [3]

итерацию


> Kolan ©   (25.01.08 16:40) [2]

Спс всем, так и сделал



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

Форум: "Начинающим";
Текущий архив: 2008.02.17;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.038 c
6-1180081075
Rimd
2007-05-25 12:17
2008.02.17
HTML как текст ver2


2-1201171310
Виктор
2008-01-24 13:41
2008.02.17
БД


15-1200427617
Real
2008-01-15 23:06
2008.02.17
Symantec11 и Daemon Tools


15-1200181039
KilkennyCat
2008-01-13 02:37
2008.02.17
Доколе?


2-1201253052
Bujhm
2008-01-25 12:24
2008.02.17
Свойство компонента





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский