problem For-Schleife

[DeddyH]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var a: integer; //lokale Variable, gilt nur innerhalb dieser Methode
    sResult: string; 
begin
  sResult := '';
  s:=edit1.Text;
  for a:=length(s) downto 1 do //a muss als Laufvariable ein ganzzahliger Datentyp sein
    sResult := sResult + s[a];
  edit2.Text := sResult;
end;

[edit] "global" in "lokal" geändert, war wohl etwas von der Rolle [/edit]