主题:哪位前辈给我看一下我的程序怎么错了
我是一位新手,请前辈们帮我看一下
procedure TForm1.Button1Click(Sender: TObject) ;
begin
edit1.Text:='123';
if edit1.Text:='123' then
memo1.clear
end.
procedure TForm1.Button1Click(Sender: TObject) ;
begin
edit1.Text:='123';
if edit1.Text:='123' then
memo1.clear
end.