新visual foxpro6.0及其程序设计 郭盈发 第11章.pptVIP

第十一章 进一步设计表单 11.1 控件的基本操作 11.2 标 签（Label） 11.3 文本框（TextBox） 11.4 列表框（ListBox） 11.5 编辑框（EditBox） 11.6 复选框（CheckBox） 11.7 命令按钮和命令按钮组 11.8 选项按钮组（OptionGroup） 11.9 表 格（Grid） 11.10 计?时?器（Timer） 11.11 组合框（ComboBox） 11.12 微调控件（Spinner） 11.13 其 它 控 件 11.14 设计参数表单 11.13.1 页框（PageFrame）控件 页框是包含页面的容器对象（页面又叫作选项卡），每一个页面控件可包含相互独立的控件，因此页框可扩展表单的表面面积。页框、页面及页面上的每一个控件均有各自的属性、事件和方法。一个表单中可包含一个或多个页框，每个页框又可包含多个页面。在一个表单中，只能有一个活动页面。 1．常用属性 (1) ActivePage：当前活动页面的值。 (2)PageCount：页框的计数属性，确定页框中的页面数，默认值为2。 (3)Pages：页框的收集属性，用来访问页框中的每一个页面。 (4) Tabs：是否显示页面。默认值为.T.（显示页面）。 (5) TabStretch：决定页面标题是否可多行显示，默认值为1（单行显示标题）。 (6)TabStyle：决定页面的显示是两端对齐还是非两端对齐。 2．页面及页面上控件的引用 可以在程序中使用ActivePage属性来激活一个页面，如使第二个页面为活动页面的代码为： Thisform.MyPageframe.ActivePage = 2 页面上的控件只有在页面处于活动状态时才可见和有效。 在表单或其它页面上要引用某个页面中的控件，必须通过引用页框容器对象。如要引用Pageframe1页框的第二个页面Page2中的Text1文本框的属性，代码为： Thisform.Pageframe1.Page2.Text1.Value 对于页面上的控件，可直接引用，如在Page2中引用Text1的属性，其代码为： Thisfrom.Text1.Value 为命令按钮组的Click事件编写如下代码，即可实现各按钮功能： DO CASE CASE Thisform.CommandGroup1.Value=1 goto top 指针指向表头 refresh Thisform 刷新表单控件内容 CASE Thisform.CommandGroup1.Value=2 if !eof(?) 如果当前记录不是末记录 skip 指针下移 else wait window?已到了最后一个记录！ endif refresh thisform CASE Thisform.CommandGroup1.Value=3 if !bof(?) 如果当前记录不是首记录 skip -1 指针上移 else wait window?已是首记录！ endif refresh Thisform CASE Thisform.CommandGroup1.Value=4 go bottom 使末记录为当前记录 refresh thisform CASE Thisform.CommandGroup1.Value=5 Thisform.Release ENDCASE 11.7.4 设置命令按钮组中各按钮的属性 在表单设计器中，既可设置命令按钮组的属性，也可以设置其中各命令按钮的属性。有两种方法可对单个按钮的属性进行编辑。 (1) 用鼠标选择命令组→单击右键→选择“编辑”→单击命令组中任何一个按钮→单击右键→选择“属性”。 (2) 用鼠标选择命令组→单击右键→选择“属性”→在“属性”窗口上部的对象下拉框中选择相应的按钮。