String zu AnsiChar oder Char umwandeln

[rollstuhlfahrer]

Hallo Wissende,

ich möchte die Zeichen von einem Memo-Feld von allen Zeichen den ASCII Wert ermitteln. Dafür hat Delphi die Funktion ord() vorgesehen. Diese kann man aber leider nicht mit einem String, sei es ein 1-Zeichen-String, füttern. Momentan bin ich soweit gekommen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  buchstabe, s: string;
  x, i, zeilen, zlaenge, zeichen: integer;
  temp: AnsiChar;  // Kann auch Char sein
begin
zeilen := Memo1.Lines.Count;
for i := 0 to zeilen-1 do
  begin
  s := Memo1.Lines[i];
  zlaenge := Length(s) - 1;
  for x := 0 to zlaenge do
    begin
    buchstabe := System.Copy(s, x, 1);        // Aus dem String den einen bestimmten Buchstaben herauskopieren
    temp := Char(buchstabe);     // Hier haperts!!
    zeichen := ord(temp);
    showmessage(inttostr(zeichen));
    end;
  end;
end;

Nun ja, ich habe es noch nicht hinbekommen eine einfache Typenumwandlung dafür hinzubekommen.
Als Anmerkunk:

showmessage(IntToStr(ord('r'))); // zeigt den ASCII-Wert von r an

var zeichen: string
showmessage(IntToStr(ord(string))); // Inkompatible Typen (umwandlung??)


rollstuhlfahrer

PS: Eine Tabelle mit möglichst vielen Typenumwandlungen fehlt (mir)