Главная arrow Юмор arrow Проверка булевого значения  
10.02.2012
Главное меню
Главная
Лаборатория
Книги по дельфи
Инструменты
Статьи
Видео
Юмор
Ссылки
Поиск
База знаний Delphi
Общие вопросы
Windows, WinAPI
Графика, Звук
IDE Delphi
Консоль
Авторизация





Забыли пароль?
Вы не зарегистрированы. Регистрация
Каталог@Mail.ru - каталог ресурсов интернет
Проверка булевого значения Версия для печати
Рейтинг: / 8
ХудшаяЛучшая 
Написал Snowy   
05.05.2007

Этот код не шутка и написан не ради прикола.
Это кусок реального кода!

 
function IsTrue(Value: boolean): boolean;
begin
  if Value <> true then result := false
  else if Value <> false then result := true
  else // внимание!
    result := (not true) and (not false);
end;
Добавить новыйПоиск
Анонимно   2008-05-20 17:16:02
:woohoo:
Werdn - "nj ghbrjk   2008-06-10 22:41:27
Это вроде прикол.
Такое я видел когдато уже, только там язык был с динамической типизацией и нельзя было узнать какого типа аргумент функции (чтото вроде того)
Анонимно   2008-12-20 20:20:05
и что же он выдает если не тру и не фалс? :?: :?: :?:
Wersaln   2009-02-05 20:10:27
ну давай рзберемся
учитывая, что в памяти компьютера
true=1
false=0
(not 1) and(not 0)
=> 0 and 1
это по логическим таблицам всю жизнь было
нулем, т е false
[O]men   2009-06-20 20:59:52
<img src=hock:' /> <img src=hock:' /> На минуту мне стало страшно.... Потом я понял всю несостоятельность кода ))) Else то никогда не будет... Ваще не понимаю зачем так морочить голову.
sdf   2009-09-21 02:48:09
<img src=illy:' /> гыгы
Unvictis   2010-01-19 09:00:31
Если это реальный пример - то покажи пример его осмысленного использования?
Игорь   2010-04-24 21:07:19
Долго думал, для чего этот код. Ну не могу представить. Возможно, кто-то переводил код с другого языка на дельфи. В дельфи однозначно - глупость.
TIB   2010-05-22 17:09:20
мдя... весёлый код... или же "поет" врёт насчёт того что не ради прикола или же я дебил! :woohoo: :evil:
TMonax   2010-11-01 13:28:31
предсказуемый баян конечно, но грех не поржать) :woohoo:
комментарии
Имя:
Заголовок:
UBB-Код:
[b] [i] [u] [url] [quote] [code] [img] 
 
 
:angry::0:confused::cheer:B):evil::silly::dry::lol::kiss::D:pinch:
:(:shock::X:side::):P:unsure::woohoo::huh::whistle:;):s
:!::?::idea::arrow:
 
Security Image
Пожалуйста, введите проверочный код, который Вы видите на картинке.
 
< Пред.   След. >