Du könntest ein eigene ChrToInt-Funktion schreiben, so in der Art:
Delphi-Quellcode:
function ChrToInt2(Value: Char): Integer;
begin
Result := 0;
try
Result := IntToStr(Value);
except
Result := Ord(Value) - 55;
end;
end;
So in die Richtung. Es handelt sich ja immer nur um ein Char, das umgewandelt wird.
"Optimistisch ist diejenige Weltanschauung, die das Sein höher als das Nichts stellt und so die Welt und das Leben als etwas an sich Wertvolles bejaht."
Albert Schweitzer