---

在窗体上画一个标签（名称为Label1）和一个时钟组件（名称为Timer1），添加2个按钮“开始”（Button1）和“停止”（Button2）。程序运行后，单击窗体“开始”按钮，时钟组件启动，并开始在标签中更新显示当前时间，每隔1秒钟变换一次，按停止按钮停止计时。（见图）。请填空｡ 然后编写如下几个事件过程:  procedure TForm1.FormCreate(Sender: TObject);  begin    Timer1.Enabled :=（①） ;    Timer1.Interval  := （②） ;  end;   procedure TForm1.Button1Click(Sender: TObject); begin    Timer1.Enabled := （③） ;  end;   procedure TForm1.Button2Click(Sender: TObject); begin Timer1.Enabled :=  （④）;  end;   procedure TForm1.Timer1Timer(Sender: TObject); begin      label1.Caption  :=  TimeToStr（⑤）;  end;

---

出自：国家开放大学《Delphi程序设计》

显示答案