Чтобы вывести данные HEX-коде, нужно пребразовать строку в такой код. Самый примитивный способ указать компилятору, что все принимаемые данные это числа и воспользовать функцией
IntToHex. К примеру, символ "S"=$53. Указать копилятору, что это не буква а цифра можно так - ord(S[i]), где S это переменная типа String, а I переменная Integer.
Код:
var
S, S1 : String;
I : Integer;
begin
for I := 1 to Length(S) do
S1[i] := IntToHex(ord(S[i]), 2);