Umrechnen von String-Werten zu dezimal Code und zurück

[DGL-luke]

Delphi-Quellcode:

function StringToCharCodes(s: string): string;
begin
  Result := '';
  for i := 1 to length(s) do
    Result := Result + '#' + inttostr(ord(s[i]));
end;

Sollte so gehen. "ABC" -> "#65#66#67".

Wenn du statt dem Gatter als trennzeichen mit leerzeichen oder nullen auffüllen willst, solltest du dir evtl. mal Format ansehen.