Page 1 of 1

Юмор.

Posted: 2006-08-18 22:49:01
by Destruction
Предлагаю обмениваться действительно смешным компьютерным юмором.

http://www.delphimaster.ru/nuts/nuts.html

Оссобенно убило,
Как сделать, чтобы по нажатию на буттон в лабеле выводилась 1 случайная буква алфавита?
Ответ:

Label1.Caption := Char(Random(26)+Ord('a'));


Спасибо. А как с русским алфавитом?
Ответ:

Наверно
Label1.Caption := Char(Random(32)+Ord('а'));


А как Делфи определяет, что если 32, то русский, а если 26, то английский?


Для танкистов - наводка, буквы "а" подозрительно похожи.

Posted: 2006-08-18 23:07:39
by DerMeister =)
ммм, смысл ясен, но вот смотрю и не понимаю... толи в русском алфавите 32 буквы чтоли, толи в английском 27 ??

------------
Через 5 минут:
------------
Вспомнел, что буква Ё особенная... => задача с русским алфавитом решена только на 96.97%

ЗЫ: Да и выводить будет только строчные буквы...

Posted: 2006-10-15 17:49:13
by yean
Вот Баян, но действительно смешно
Теория ошибок