String zu AnsiChar oder Char umwandeln

[DeddyH]

Hallo, ich habe Deinen Source mal etwas zusammengekürzt (ungetestet):

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 := 1 to Length(s) 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(Ord(s[x])));
    end;
  end;
end;