Buchstaben als Zahl geht-aber Zahl zu Buchstabe geht nicht

[DeddyH]

Ich weiß zwar immer noch nicht so genau, was Du vorhast, aber evtl. klappt es so:

Delphi-Quellcode:

function getNR(const ZahlStr: string): char;
var
  Zahl: integer;
begin
  Result := ' ';
  if TryStrToInt(ZahlStr, Zahl) then
    case Zahl of
      1: result := 'A';
      2: result := 'B';
      3: result := 'C';
      4: result := 'D';
      5: result := 'E';
      6: result := 'F';
      7: result := 'G';
      8: result := 'H';
      9: result := 'I'; 
    end
  else
    //Fehlermeldung ausgeben oder etwas in der Art
end;