Главная страница
    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.044 c
3-1191485669
Ega23
2007-10-04 12:14
2008.02.17
TADODataSet.Post - не сохранять данные в БД


6-1180434983
G_M_S
2007-05-29 14:36
2008.02.17
Компонент для чтения RSS


2-1201243079
F@T@L_Err0r
2008-01-25 09:37
2008.02.17
Edit


2-1201500506
psa247
2008-01-28 09:08
2008.02.17
получить ListView.Data ?


2-1201170172
bagos
2008-01-24 13:22
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский