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.