Главная страница
    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.46 MB
Время: 0.051 c
3-1310747259
Дмитрий
2011-07-15 20:27
2017.01.15
Вылет при изменении данных в гриде (Eh)


15-1451823438
Сергей
2016-01-03 15:17
2017.01.15
Выбор версии Delphi


1-1340491010
Dimka Maslov
2012-06-24 02:36
2017.01.15
Службы и иже с ними


1-1341941337
4ainik
2012-07-10 21:28
2017.01.15
При удалении TabSheet-ов стринггрид теряет фокус


2-1422510042
Смирнов А.И.
2015-01-29 08:40
2017.01.15
Копирование файла





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