Юмор.

[Destruction]

Предлагаю обмениваться действительно смешным компьютерным юмором.

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

Оссобенно убило,

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

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

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

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

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

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

[DerMeister =)]

ммм, смысл ясен, но вот смотрю и не понимаю... толи в русском алфавите 32 буквы чтоли, толи в английском 27 ??

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

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

[yean]

Вот Баян, но действительно смешно
Теория ошибок