[Mavin]

chr(ord('Я')) возвращает 'B' (бетта)

Англоязычная Delphi XE.

[Mavin]

Всё. Нашел.

http://www.sql.ru/Forum/actualthread...tid=782767&hl=

[Mavin]

По таблице Unicode (http://www.tamasoft.co.jp/en/general-info/unicode.html)

Сделал примерно так:

PHP код:

case Code of
ord('А')..ord('Я'), ord('а')..ord('я'): Code := Code+848;
end;
Result := Result + Chr(Code); 


Тупо, но работает.

Кто предложит более элегантный метод, буду признателен.