ASCII aus Textdatei lesen+umwandeln

[DeddyH]

Ungetestet:

Delphi-Quellcode:

var
  sl: TStringlist;
  i, ASCII: integer;
begin
  sl := TStringlist.Create;
  try
    sl.LoadFromFile(Dateiname);
    for i := 0 to sl.Count - 1 do
      if TryStrToInt(sl[i], ASCII) then
        begin
          if (ASCII < 0) or (ASCII > 255) then
            raise Exception.CreateFmt('Kein gültiger ASCII-Wert: %d', [ASCII]);
          sl[i] := Chr(ASCII);
        end
      else
        sl[i] := IntToStr(Ord(sl[i]));
    sl.SaveToFile(NeuerDateiname);
  finally
    sl.Free;
  end;
end;

Sollen auch Werte außerhalb des erweiterten ASCII-Satzes gültig sein, musst Du die Prüfung entsprechend ändern.