时钟及菜单设计21

1、浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业1.用途用途 时钟控件（时钟控件（Timer）又称计时器、定时器控件，）又称计时器、定时器控件，用于用于有规律地定时执行指定的工作有规律地定时执行指定的工作，常常用于编写，常常用于编写不需要与用户进行交互就可直接执行的代码，如不需要与用户进行交互就可直接执行的代码，如计计时、倒计时、动画时、倒计时、动画等。等。 在程序运行阶段，时钟控件不可见。在程序运行阶段，时钟控件不可见。 时钟时钟浙江科技学院教信系计算

2、机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 2 属属 性性（1）Interval属性属性 取值范围在取值范围在0 64767 ，单位：为，单位：为毫秒毫秒（0.001秒），表秒），表示计时间隔。若将示计时间隔。若将Interval属性设置为属性设置为0或负数，则计时器或负数，则计时器停止工作。停止工作。 缺省设置为缺省设置为 0。 当当Interval属性为属性为1000时，时间间隔是时，时间间隔是1秒。要注意的是，秒。要注意的是，定时器的时间间隔并不精确，特别是当定时

3、器的时间间隔并不精确，特别是当Interval属性设的太属性设的太小时，甚至会影响系统的性能。小时，甚至会影响系统的性能。 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业（2）Enabled属性属性 设置为设置为True，而且而且Interval属性值大于属性值大于0，则，则计时器计时器开始工作开始工作（以以Interval属性值为间隔，触发属性值为间隔，触发Timer事件事件）。）。 设置为设置为False可使时钟控件无效，即计时器停止可使时

4、钟控件无效，即计时器停止工作。工作。 缺省设置为缺省设置为True 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业3 方方 法法 Timer控件没有方法控件没有方法。4 事事 件件 时钟控件只有时钟控件只有Timer事件事件 当当Enabled属性值为属性值为True且且Interval属性值大于属性值大于0时，时， 该事件以该事件以Interval属性指定的时间间隔发生。属性指定的时间间隔发生。 常常将需要定时执行的操作放在常常将需要定时执行

5、的操作放在Timer事件事件过程中。过程中。 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业例例1、 在窗体上建立数字计时器。在窗体上建立数字计时器。在窗体上建立一个时钟空间和一个标签控件。在窗体上建立一个时钟空间和一个标签控件。时钟控件的名称为时钟控件的名称为tmrclocktmrclock，intervalinterval属性设置为属性设置为10001000；标签控件名称为标签控件名称为lblclocklblclock，borderstyl

6、eborderstyle（边界类型）属（边界类型）属性值为性值为1 1（单线），（单线），fontnamefontname为为“宋体宋体”，fontsizefontsize为为1212。 常常用于编写不需要与用户进行交互就可直接执行的代常常用于编写不需要与用户进行交互就可直接执行的代码，如：码，如：计时器、倒计时、动画计时器、倒计时、动画等。等。时钟控件的应用举例时钟控件的应用举例 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 分析：在分析：

7、在tmrclock_timertmrclock_timer事件过程中将事件过程中将timer$timer$函数函数返回的系统时间存入返回的系统时间存入lblclocklblclock标签控件中。标签控件中。 时钟时钟 设计时时钟控件显示在窗体中，但是执行时不会显示。设计时时钟控件显示在窗体中，但是执行时不会显示。浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业例例2：设计一个能够定时的时钟，用户在两个文本款：设计一个能够定时的时钟，用户在两个文本款（tx

8、thour和和txtminute）中设置定时时间，然后按定时）中设置定时时间，然后按定时（cmdset）按钮闹钟才开始生效。两个文本框的）按钮闹钟才开始生效。两个文本框的maxlength属性为属性为2，时钟控件名称为，时钟控件名称为tmrclock，停止，停止和结束按钮的名称分别为和结束按钮的名称分别为cmdcancel和和cmdend。 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学

9、院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 时钟时钟浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜 单单1 菜单概述菜单概述 菜单是图形化菜单是图形化界面一个必不可少界面一个必不可少的组成元素，通过的组成元素，通过菜单对各种命令按菜单对各种命令按功能进行功能进行分组分组，使，使用户能够更加方便、用户能够更加方便、直观地访问这些命直观地访问这些命令。

10、令。 菜单项菜单项动态菜单项动态菜单项子菜单项子菜单项分隔条分隔条快捷键快捷键热键热键浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜 单单 菜单中的菜单项可以是命令、选项、分隔条或菜单中的菜单项可以是命令、选项、分隔条或子菜单标题，每个菜单项都是一个控件，与其他控子菜单标题，每个菜单项都是一个控件，与其他控件一样有自己的属性和事件。件一样有自己的属性和事件。 菜单项的各个属性都能设置和查看，如菜单项的各个属性都能设置和查看，如name和和capt

11、ion，每个菜单项只能响应一个事件，即，每个菜单项只能响应一个事件，即click事事件。件。浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业启动菜单编辑器：启动菜单编辑器：有两种方法：有两种方法：1 工具工具/菜单编辑器菜单编辑器 (CTRL+E)2 窗体上快捷菜单窗体上快捷菜单 菜单编辑器菜单编辑器 菜单编辑器操作界面如右菜单编辑器操作界面如右所示。所示。2 菜单编辑器菜单编辑器 菜菜 单单浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机

12、基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业3 菜单编辑器的使用技巧菜单编辑器的使用技巧1. 标题标题(Caption)：2. 名称名称(Name)：3. 快捷键快捷键(Shortcut)：4. 下一个下一个(Next)：5. 和和按钮按钮6. 插入插入(Insert)按钮：按钮：7. 删除删除(Delete)按钮：按钮：8 和和按钮：按钮：9. 复选复选(Checked)检查框：检查框：10. 有效有效(Enabled)检查框：检查框：11. 显示窗口列表显示窗口列表(Window List)检查框：检查框：

13、根据设计要求，依次输入或选择所面项目，即可完成。例：根据设计要求，依次输入或选择所面项目，即可完成。例：浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜单的主要属性菜单的主要属性1. 标题标题(Caption)：在窗口上显示。如果输入时在菜单标题的某：在窗口上显示。如果输入时在菜单标题的某个字母前输入一个个字母前输入一个&符号符号，则该字符就成为，则该字符就成为热键字母热键字母，在窗体，在窗体上显示时该字母下有下划线，操作时同时按下上显示时该

14、字母下有下划线，操作时同时按下Alt键和该带有下键和该带有下划线的字母就可以选择这个菜单项命令。划线的字母就可以选择这个菜单项命令。 例如：输入例如：输入&File，显示为：，显示为： File，热键：，热键：Alt+F 2. 名称名称(Name)：菜单项的名称，分界符也应有名称，不会显示菜单项的名称，分界符也应有名称，不会显示出来。出来。3. 快捷键快捷键(Shortcut)：下从拉列表框中选择一个快捷键，也可以下从拉列表框中选择一个快捷键，也可以不选。如果选择了快捷键则会显示在菜单标题的邮编，在程序不选。如果选择了快捷键则会显示在菜单标题的邮编，在程序运行时，用户快捷键可完成选择该

15、菜单项并执行相应命令的操运行时，用户快捷键可完成选择该菜单项并执行相应命令的操作。作。3 菜单编辑器的使用技巧菜单编辑器的使用技巧浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 4 下一个下一个(Next)： 设置下一个菜单项。设置下一个菜单项。 5. 和和按钮：按钮：“” 下一级菜单项；下一级菜单项；“”上一级菜单项。上一级菜单项。6. 插入插入(Insert)按钮：按钮：插入菜单项插入菜单项7. 删除删除(Delete)按钮：按钮：删除菜单项删除菜

16、单项8. 和和按钮：按钮：改变菜单项位置。改变菜单项位置。9. 复选复选(Checked)检查框：检查框：菜单项为选定项。菜单项为选定项。 如果在显示框中选定了某个菜单项，再选定如果在显示框中选定了某个菜单项，再选定checked检查框，则检查框，则当前被选定的菜单项左边加上了检查标记当前被选定的菜单项左边加上了检查标记“ ”，表示该菜单，表示该菜单项是一个选项。项是一个选项。 3 菜单编辑器的使用技巧菜单编辑器的使用技巧浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clip

17、board 作业 10. 有效有效(Enabled)检查框：检查框： 当该检查框被选中，表示菜单项的当该检查框被选中，表示菜单项的enabled属性为属性为true，程序执行时菜单项高亮度显示，是可选的，当没有被程序执行时菜单项高亮度显示，是可选的，当没有被选中，即选中，即enabled属性为属性为false，在程序执行时该菜单项，在程序执行时该菜单项变成灰色，不能被用户选择。变成灰色，不能被用户选择。 11. 显示窗口列表显示窗口列表(Window List)：显示窗口列表。：显示窗口列表。3 菜单编辑器的使用技巧菜单编辑器的使用技巧浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计

18、算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业1设计下拉菜单设计下拉菜单2设计子菜单或改变子菜单级别设计子菜单或改变子菜单级别 3为菜单项分组为菜单项分组 ： 菜单名用减号菜单名用减号“-”4为菜单项指定访问键和快捷键为菜单项指定访问键和快捷键 与命令按钮设置访问键相同。与命令按钮设置访问键相同。5为菜单项加上复选标记为菜单项加上复选标记6禁止使用菜单项禁止使用菜单项 在程序代码中可以通过程序代码：在程序代码中可以通过程序代码： 菜单名菜单名.Enabled=False7菜单项的增减菜单项的增减 菜单设计的几

19、项操作：菜单设计的几项操作：3 菜单编辑器的使用技巧菜单编辑器的使用技巧浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业例例3、编写一个简单的文本编辑程序，效果如编写一个简单的文本编辑程序，效果如下下图所示图所示（form1的的名称改成文本编辑程序）名称改成文本编辑程序）：建立如建立如右右表所示的菜单结构：表所示的菜单结构： 菜菜 单单浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.N

20、et目录8.1 8.2 8.3 Screen Clipboard 作业编写一个简单的文本编辑程序，效果如编写一个简单的文本编辑程序，效果如下下图所示图所示（form1的名称改的名称改成文本编辑程序）成文本编辑程序）：建立如建立如右右表所示的菜单结构：表所示的菜单结构： 菜菜 单单浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜 单单例例4、建立一个菜单，能够完成简单的加、减、乘、除及清除操作。、建立一个菜单，能够完成简单的加、减、乘、除及清除操作。

21、窗口的以一个菜单窗口的以一个菜单“计算计算1”有有“加法加法”和和“减法减法”两个命令。第二个菜两个命令。第二个菜单单“计算计算2”有三个命令有三个命令“乘法乘法”、“除法除法”和和“清除清除”。“操作数操作数1”和和“操作数操作数2”下面的两个文本框用来输入两个数据。下面的两个文本框用来输入两个数据。“计算结果计算结果”下面下面的标签用来显示两个操作数的计算结果。的标签用来显示两个操作数的计算结果。浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜

22、 单单建立菜单的步骤如下：建立菜单的步骤如下：（1）建立控件，窗体中共有六个控件，属性如下：）建立控件，窗体中共有六个控件，属性如下：浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜 单单（2）设计菜单，在设计状态下选择）设计菜单，在设计状态下选择“工具工具”菜单下的菜单编辑器。按照菜单下的菜单编辑器。按照下表对么一个菜单项输入标题、控制名称和相应的快捷键。下表对么一个菜单项输入标题、控制名称和相应的快捷键。浙江科技学院教信系计算机基础教学网站：浙

23、江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜 单单（3）事件过程代码）事件过程代码浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业 菜菜 单单（3）事件过程代码）事件过程代码浙江科技学院教信系计算机基础教学网站：浙江科技学院教信系计算机基础教学网站：www.Goit.Netwww.Goit.Net目录8.1 8.2 8.3 Screen Clipboard 作业3 菜单项增减菜单项增减 动态增