delphi中edit的用法?procedure TForm1.Button1Click(Sender: TObject)beginif Edit1.Text= thenEdit1.Text:=ABCelseEdit1.Text:=Edit1.Text 30end