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

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

оператор case [D7, XP]


Dmitry_177 ©   (2007-05-26 00:10:00) 

Есть оператор Case, его структура такова:
case i of
 1: ...;
 2: ...;
else
 ...
end;

так вот мне не очень понятно, если после else должно выполниться несколько действий, так вот нужно ли ставить begin и end? Т.е. примерно вот так:
case i of
 1: ...;
 2: ...;
else
 begin  
   ...
   ...
   ...
 end;
end;


DrPass   (2007-05-26 16:02:00) [1]


> так вот мне не очень понятно, если после else должно выполниться
> несколько действий, так вот нужно ли ставить begin и end

Слушай, а что тебе мешает попробовать сделать так, и посмотреть, что получится? Не бойся, компьютер не взорвется, и менты к тебе тоже не приедут


Johnmen   (2007-05-26 00:38:00) [2]


> Dmitry_177   (26.05.07 00:10) 

У тебя что, кнопка F1 западает?


No_Dead   (2007-05-26 00:27:00) [3]

посмотри, подумай)))
var
i:integer;
begin
i:=strtoint(edit1.Text);
case i of
1..10:showmessage('1..10');
11..20:showmessage('11..20')
else
showmessage('else1');
showmessage('else2');
showmessage('else3');
end;


Наверх

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