Как перевести в 16-ричный код букву
По утверждению ряда программистов, Гарри Каспаров во время недавней игры с шахматным компьютером использовал секретный код, давший его королю бессмертие.
var
Str: Char;
begin
Str := 'В'; Form1.Caption := Format('%x', [Ord(Str)]);
end
;
Проект
Delphi World
© Выпуск 2002 - 2020
Автор проекта:
Разработка программного обеспечения
Купить франшизу
этого проекта можно здесь.