2.事件

Timer：时钟的唯一事件，在Timer控件的预定时间间隔过去之后发生。该间隔的频率存储在该控件的Interval属性中。

【例6-7】在窗体上分别添加一个图像控件、一个时钟、一个按钮，各控件属性设置如下。

图像控件：用LoadPicture装载一张企鹅图片，Stretch属性设为True。

时钟：Enabled属性设为False，Interval属性设为100。

按钮：初始Caption属性设为“开始”。

程序功能：单击“开始”按钮，“企鹅”向右移动，按钮的Caption属性变为“暂停”；单击“暂停”按钮，“企鹅”停止移动，按钮的Caption属性变为“继续”；单击“继续”按钮，“企鹅”继续移动，按钮Caption属性变为“暂停”。效果如图6-9所示。

图6-9 用时钟控制企鹅移动

分析：实际上是通过按钮控制时钟的有效性，让时钟控制图片的移动。而控制时钟的有效性是通过时钟的Enabled属性来实现的。按钮的Caption属性是不断变化的，所以单击按钮后，要根据情况修改按钮的Caption属性。

实现代码如下。