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

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

Алгоритм проверки [D6, Win95/98]


borg ©   (2002-11-22 07:28:00) 

Мастера может кто поможет, надо проверять получившееся число не равно ли оно 1-32, 127, 152, 160, и каждое из этих чисел +256, то есть 257-288 и т. д. до 1000. Как это сделать красиво если в CASE то получается уж очень он длинный, около 130 условий. С IF тоже самое. Может кто подскажет что нибудь по умнее. Заранее большое спасибо.


Poirot   (2002-11-22 18:06:00) [1]


> mrcat ©


1 - MBo всегда прав!!!
2 - Если MBo не прав - смотри пунк 1


KoluChi   (2002-11-22 13:49:00) [2]

>mrcat © (22.11.02 13:34)
>set поддерживает элементы до 256, человеку надо до 1000...
по-моему все правильно
учи основы языка, без них туго - Mod - остаток от деления, больше 255 не будет.


mrcat   (2002-11-22 13:34:00) [3]

>>учи основы языка, без них туго
>>if byte(i mod 256) in [1..32,127,152,160] then

set поддерживает элементы до 256, человеку надо до 1000...


MBo   (2002-11-22 07:34:00) [4]

учи основы языка, без них туго

if byte(i mod 256) in [1..32,127,152,160] then


Наверх

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