Wie kann man den Asciiwert errechnen

[nahpets]

ungetestet ungefähr so?

Delphi-Quellcode:

var
  s : String;
  i : Integer;
  ch : Char;
  asc : Integer;
begin
  s := 'ABCDEF';
  for i := 1 to Length(s) do begin
    ch := s[i];
    asc := Ord(ch);
  end;
  // oder
  for i := 1 to Length(s) do begin
    asc := Ord(s[i]);
  end;
end;

Ord kann nur mit einem Zeichen umgehen, nicht jedoch mit einem String oder Substring, wie ihn Copy liefert, daher hilft hier das Konstrukt mit [x], als Positionsangabe für das ausgewählte Zeichen innerhalb eines Strings.