Visual FoxPro 程序设计 教学课件 作者 吴昊 熊李艳 第10章 常用的表单控件.pptVIP

③编写程序代码。 *编写表单Form1的Activate事件代码： This.Text1.SetFocus *编写OptionGroup1的Click事件代码： n=This.Value DO CASE CASE n=1 Thisform.Text1.Alignment=0 CASE n=2 Thisform.Text1.Alignment=2 CASE n=3 Thisform.Text1.Alignment=1 ENDCASE *编写OptionGroup2的Click事件代码： n=This.Value DO CASE CASE n=1 Thisform.Text1.FontName=宋体 CASE n=2 Thisform.Text1.FontName=隶书 CASE n=3 Thisform.Text1.FontName=楷体_GB2312 ENDCASE 例10.10 10.11 命令组控件（CommandGroup） 命令组控件是包含一组命令按钮的容器控件，用户可以单个或作为一组来操作其中的按钮。 在表单设计器中，为了选择命令组中的某个按钮，以便为其单独设置属性、方法和事件，可以采用以下两种方法：一是从属性窗口的对象下拉式组合框中选择所需的命令按钮；二是用鼠标右键单击命令组，然后从弹出的快捷菜单中选择“编辑”命令，这样命令组就进入了编辑状态，用户可以通过鼠标单击来选择某个具体的命令按钮。这种编辑操作方法对其它容器类控件同样适用。 常用属性： ①ButtonCount属性 该属性指定命令组中命令按钮的数目。在表单中创建命令组说，ButtonCount属性的默认值为2，即包含2个命令按钮。可以通过改变ButtonCount属性的值来重新设置命令组中的命令按钮的数目。新增命令按钮的名称（Name）由系统自动给定（如Command3、Command4等），但是用户可以重新设置。该属性在设计和运行阶段可用。 ②Buttons属性 该属性用于存取命令组中各按钮的数组。该属性数组在创建命令组时建立，用户可以利用该数组为命令组中的命令按钮设置属性或调用其方法。属性数组下标的取值范围应该在1至ButtonCount属性值之间。该属性在设计时不可用。 ③Value属性 该属性指定命令组的当前状态。该属性的类型可以是数值型的（默认情况），也可以是字符型的。若为数值型n，则表示命令组中的第n个命令按钮被选中；若为字符型c，则表示命令组中Caption属性值为c的命令按钮被选中。 若命令组中的某个按钮有自己的Click事件，则一旦单击该按钮，就会优先执行为它单独设置的代码，而不会执行命令组的Click事件代码。该属性在设计和运行阶段可用。 【例10.11】演示命令组控件的使用特点。 设计步骤如下： ①建立应用程序用户界面。 选择“新建”表单，进入表单设计器，增加一个Text1、一个命令组控件CommandGroup1（如下图所示）。 ②设置对象属性，完成之后如下图所示。 ③编写程序代码。 *编写CommandGroup1的Click事件代码： DO CASE CASE This.Value=1 Thisform.Text1.Value=指针移到顶部命令：Go Top CASE This.Value=2 Thisform.Text1.Value=指针上移命令：Skip -1 CASE This.Value=3 Thisform.Text1.Value=指针下移命令：Skip CASE This.Value=4 Thisform.Text1.Value=指针移到底部命令：Go Bottom ENDCASE 例10.11 10.12 图像控件（Image） 图像控件允许在表单中显示图片（.bmp文件）图像控件与其它控件一样，具有一整套的属性、事件和方法程序。图像控件在运行时可以动态地改变它。用户可以用单击、双击和其它方式以交互地使用图像（图像文件的类型可以是.bmp、.ico、.gif、.jpg等）。 常用属性： ①Picture属性 该属性指定将要显示的图片（.bmp文件）。 ②BorderStyle属性 该属性决定图像是否具有可见的边框。 ③Stretch属性 该属性指定图像的显示方式：若该属性设置为0（剪裁），则超出图像控件范围的那部分图像将不显示；若该属性设置为1（恒定比例），则图像控件将保留图片的原有比例，并在图像控件中显示最大可能的图片；若该属性设置为2（伸展），则将图片调整到正好与图像控件的高度和宽度相匹配。 例10