Hex[aus Bytes] To Ascii

[DarkPressure]

Erstmal danke für die schnellen Antworten.
Es gibt aber leider noch ein Problem,

Delphi-Quellcode:

function VisibleString(const src:string): string;
var
i : integer;
begin
   SetLength(result, Length(src));
   for i := 1 to Length(src) do
   begin
      case src[i] of
      0..31:  // nicht druckbar  <<----- [Error] Unit1.pas(122): E2010 Incompatible types: 'Char' and 'Integer'
         result[i] := '.';   // das Ersatzzeichen
      else
         result[i] := src[i];
      end;
   end;
end;