Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

вопрос по Case


SvetaZ1 ©   (2015-03-15 00:29:00) 

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

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 - процедуру.


Jeer   (2015-03-15 18:56:00) [1]

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


Dennis I. Komarov   (2015-03-15 13:54:00) [2]

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


Dimka Maslov   (2015-03-15 11:38:00) [3]

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


manaka   (2015-03-15 10:21:00) [4]

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


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


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

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

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

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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо