Функция перевода строки в шестнадцатеричное (HEX) представление

Функция для перевода текста в HEX-представление

Функция для перевода текста в HEX-сущности представляет собой перевод из текстового представления в шестнадцатеричный код символа строки с добавлением перед ним пробела

function GetHexView(sToHTML: String): String;
var i: Integer;
begin
for i:= 1 to Length(sToHTML) do
begin
  Result:= Result + ' ' + IntToHex(Ord(sToHTML[i]), 2);
end;
end;

Например, передаём в эту функцию строку Программирование, на выходе получаем строку CF F0 EE E3 F0 E0 EC EC E8 F0 EE E2 E0 ED E8 E5
которую удобно применять при логировании программ, разработке программного обеспечения для АСУТП, работающего с пакетами данных (сырыми данными) контроллеров.

25.09.2008

Google