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

Вниз

Функция CASE   Найти похожие ветки 

 
Системщик ©   (2006-04-10 21:59) [0]

Как с помощью функции CASE вычислить три уравнения объединенные слева фигурной скобкой. Если есть условие допустим а>0 b<0 итп.В учебнике объясняется пример только с одним условием константой. Кто понял объясните.


 
Рамиль ©   (2006-04-10 22:41) [1]

В огороде бузина, в Киеве дядька.
Причем здесь case?


 
STK ©   (2006-04-10 23:09) [2]

case работает с индексом - ну *лин почитай где-нить

попробуй через If.

А лучше распиши может не будет такого:

> Рамиль ©   (10.04.06 22:41) [1]
> В огороде бузина, в Киеве дядька.
> Причем здесь case?


 
Джо ©   (2006-04-10 23:22) [3]

> [2] STK ©   (10.04.06 23:09)
> case работает с индексом - ну *лин почитай где-нить

а где можно об этом почитать? Конкретно интересует, с каким индексом работает case?


 
Мефисто   (2006-04-10 23:31) [4]

Джо ©   (10.04.06 23:22) [3]

Тс-с-с-с-с...

Никому не говри. CASE - это приблуда от BDE.
Типа объявляешь поле Field (индексы автоматом приписываются), а дальше рекорды вставляешь.

case Field of
 0: ... ;
 1: ... ;
 2: ... ;
...
end;

:)


 
STK ©   (2006-04-10 23:45) [5]


> Джо ©   (10.04.06 23:22) [3]


> Мефисто   (10.04.06 23:31) [4]

Хорош стебаться. Согласен, неправильно выразился.

Case <выражение> of
<значение 1>: <операторы>;
...
<значение N>: <операторы>;
else <операторы>; //если не один из N списка значений не попал.
end;

Хотя если взял в руки програмирование то такие вещи должен знать. Правда на первый взгляд тут отсутствие попытки подхода с точки зрения логики.

Совет напиши блок-схему. Может поможет.


 
Джо ©   (2006-04-10 23:47) [6]

> Хорош стебаться. Согласен, неправильно выразился.


Вот когда научишься выражаться правильно, тогда и стебаться будет на над чем. А учить меня не нужно, я этого не просил.


 
Джо ©   (2006-04-10 23:50) [7]

Человек, говорящий о том, что case использует какие-то индексы и при этом советующий почитать книгу о программировании не может, ИМХО, расчитывать на серьезное отношение к его посту.


 
Мефисто   (2006-04-10 23:52) [8]

STK ©   (10.04.06 23:45) [5]

Тут многие, бывает неправильно выскажутся...
И не все можно такуж к стебу относить... Я ведь просмайлился :)
В бывшей потрепаться, любили и не так постебаться :)))


 
STK ©   (2006-04-11 00:03) [9]


> Джо ©   (10.04.06 23:47) [6]
> > Хорош стебаться. Согласен, неправильно выразился.
>
>
> Вот когда научишься выражаться правильно, тогда и стебаться
> будет на над чем. А учить меня не нужно, я этого не просил.
>

А я не тебя учил, а ему показал:
> Системщик ©

Но одно из всего этого мне не нравиться, ЧТО НЕ КТО НЕ ХОЧЕТ ПОМОЧ, пусть он даже лабуду написал. Хотя каждому своё охота. Вот это уже 9 топик, а ответов или советов или хотябы поправки(нормальной) не вижу.
Я всё за веткой следить не буду.


 
Юрий Зотов ©   (2006-04-11 01:17) [10]

> STK ©   (10.04.06 23:45) [5]

Синтаксис неверен. Правильно так:

сase <выражение ПОРЯДКОВОГО ТИПА> of
 <значение 1>: <ОДИН оператор>;
 ...
 <значение N>: <ОДИН оператор>;
 else <ОДИН оператор>
end;


 
jack128 ©   (2006-04-11 01:23) [11]

Юрий Зотов ©   (11.04.06 1:17) [10]
else <ОДИН оператор>


var
 i: INteger;
begin
 I := 120;
 case I of
  0:  ;
 else
   ShowMessage("Test");
   ShowMessage("Test")

 end;
end;

Не думаю, что выделенное тянет на один оператор ;-)


 
Юрий Зотов ©   (2006-04-11 01:27) [12]

> jack128 ©   (11.04.06 01:23) [11]

Девствиттно.
(с) майор Староконь.

Но только в else.

Наворотили, блин, наворотов. А я все по классике, панимашь, бегин-энд пишу.


 
Германн ©   (2006-04-11 02:22) [13]


> Юрий Зотов ©   (11.04.06 01:27) [12]
>
> > jack128 ©   (11.04.06 01:23) [11]
>
> Девствиттно.
> (с) майор Староконь.
>
> Но только в else.
>
> Наворотили, блин, наворотов. А я все по классике, панимашь,
>  бегин-энд пишу.
>

Вот, блин. И я тоже никак не могу в else (of case) избавиться от бегин-энд.
И даже уже как-то пришлось "извиняться с пояснениями" на сём форуме. :-(


 
Плохиш ©   (2006-04-11 10:45) [14]


> Юрий Зотов ©   (11.04.06 01:27) [12]
> Германн ©   (11.04.06 02:22) [13]

Зато читаемость повышается, а то наделали исключений, пАнимаешь :-)


 
Leonid Troyanovsky ©   (2006-04-11 11:40) [15]


> Системщик ©   (10.04.06 21:59)  

> Кто понял объясните.


Мало что понял, но, возможно, что
RTFM:  Object Pascal Language Guide: Case statements

--
Regards, LVT.



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

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

Наверх




Память: 0.48 MB
Время: 0.013 c
15-1143746621
Yanis
2006-03-30 23:23
2006.04.23
Хорошая прога :)


1-1142875448
KALqYAN
2006-03-20 20:24
2006.04.23
Picture Change...


15-1143818425
Svetlana_K
2006-03-31 19:20
2006.04.23
Как отследить запуск программы?


2-1144566772
hgd
2006-04-09 11:12
2006.04.23
Graphics 32


11-1125182052
ebta
2005-08-28 02:34
2006.04.23
just a little bug v2.10





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