Problem bei for Schleife

[lbccaleb]

vllt so??

Delphi-Quellcode:

//nicht getestet
procedure TForm1.ReplaceClick(Sender: TObject);
var
i: integer;
  begin
    for i := 0 to 200 do
    try
    except
      Memo1.Lines.Delete(i - 1);
  end;
  ReplaceClick(Self);
end;

edit:
aber wieso überhaupt so umständlich?? wenn du nur das memo "leeren" willst, kannst du das auch so:
memo1.lines.clear;