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

Вниз

вопрос по Case   Найти похожие ветки 

 
SvetaZ1   (2015-03-15 00:29) [0]

Есть конструкция вида:

for i := 0 to Count - 1 do
begin
  case Num of
     1: begin
           код_1;
           if(условие) then ???
           код 2;
         end;
     2:....................
  end;
end;


Как можно прервать выполнение кода "код_2"? внутри Case
Вариант:

if(not условие) then код 2;

не предлагать

Break - обрывает цикл.
Exit - процедуру.


 
DVM ©   (2015-03-15 00:37) [1]

Continue что ли нужно?


 
Германн ©   (2015-03-15 01:50) [2]


> Вариант:
>
> if(not условие) then код 2;
>
> не предлагать
>

А без него никак не обойтись. Без проверки какого либо условия, нельзя сделать ветвление.

> DVM ©   (15.03.15 00:37) [1]
>
> Continue что ли нужно?
>

Возможно что именно оно нужно. Но Continue в данном случае совсем будет нечитаемым.


 
manaka ©   (2015-03-15 10:21) [3]

Удалено модератором


 
Dimka Maslov ©   (2015-03-15 11:38) [4]

Написать внутреннюю функцию, в которой нормально будет работать Exit?


 
Dennis I. Komarov ©   (2015-03-15 13:54) [5]

А я бы про X Y Z написал...


 
Jeer ©   (2015-03-15 18:56) [6]

goto никто не отменил, но стоит посмотреть на логику в целом.



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

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

Наверх





Память: 0.45 MB
Время: 0.046 c
2-1424257125
SvetaZ
2015-02-18 13:58
2017.01.15
компонент TImage при больших размерах


2-1426051919
goga_m
2015-03-11 08:31
2017.01.15
Проблема с запросом в Access


15-1456608604
Юрий
2016-02-28 00:30
2017.01.15
С днем рождения ! 28 февраля 2016 воскресенье


15-1451394616
Kerk
2015-12-29 16:10
2017.01.15
Сувениры


15-1454794206
Юрий
2016-02-07 00:30
2017.01.15
С днем рождения ! 7 февраля 2016 воскресенье





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