看一看用了清除语句怎么还是没有清除呀！

Question

procedure TForm1.FileNew1Execute(Sender: TObject);
begin
  richedit1.Lines.Clear;
  filename:='untitled.txt';
  statusbar1.SimpleText:=filename;
end;
多谢了！！

Answer 1

richedit1.Lines.Clear;应该可以清除。加断点跟踪测试一下。

Answer 2

上面的用了以上方法均不能用
仍然存在Richedit1。

Answer 3

RichEdit1.Clear;
RichEdit1.Lines.Clear;
RichEdit1.Text:='';都可以清除，你试试吧！