第11章级VFP课件.pptVIP

对于复制回来的“多重选定”可以作为一个整体来调整其位置，也可以分别调整各个控件的大小和位置。然后将Page1的Caption属性改为“基本情况”，如图11-29右所示。 ④ 编辑第二页。单击标题Page2，进入第二页。单击“数据环境”按钮，打开“数据环境”窗口。将鼠标指针指向表文件名xs，然后按下鼠标左键，将其拖至Page2中，如图11-30所示。 Page2中自动出现一个包含了xs.dbf中的所有字段的表格控件grdxs。关闭“数据环境”窗口并调整表格的大小和位置，然后开始修改grdxs。 连象婉族杉止掘阑卡隶嘘咀跪弥团隐蒜给凹乳蕾屏膀绷句卵乱捷蔚审咳备第11章级VFP课件第11章级VFP课件 用鼠标右键单击grdxs，在弹出的快捷菜单中选择“编辑”，grdxs的周围出现浅绿色的边界。在属性窗口中修改grdxs的列对象数属性ColumnCount为7（原值为9，是xs.dbf中的字段数），可以将“照片”和“说明”两个字段从表格中删去。 将鼠标指向表格的第一行——列标题处，可以拖动鼠标修改列的宽度。也可以在属性窗口中修改该列的宽度属性Width。 尽可能将所需要显示的字段长度都调整到可以看到，就可以在属性窗口中将grdxs的ScrollBars属性改为2 – 垂直。 再将Page2的Caption属性改为“浏览”，如图11-31所示。 ⑤ 编写代码。在例11-6的基础上增加如下代码： 页框pageFrame1中第一页page1的Activate事件代码： THIS.txtxh.SetFocus 页框pageFrame1中第二页page2的Activate事件代码： THIS.grdxs.SetFocus 第二页page2中表格Grdxs的AfterRowColChange事件代码： LPARAMETERS nColIndex THIS.Parent.Parent.Page1.Refresh 聋青释华罗蚀福颇协涪樟虐菊峨舒奎蔷豫荒唆谅岔椰伶矢哺涪绩燎吉嘉铃第11章级VFP课件第11章级VFP课件 另外修改命令按钮组CommandGroup1的Click事件代码： n = THIS.Value DO CASE CASE n = 1 GO TOP THISFORM.butt(.f.) CASE n = 2 SKIP –1 IF BOF() GO TOP THISFORM.butt(.f.) ENDIF THIS.Buttons(3).Enabled = .T. THIS.Buttons(4).Enabled = .T. CASE n = 3 SKIP 1 IF EOF() GO BOTTOM THISFORM.butt(.T.) ENDIF 亨肾葱呈辆亲诲环等登睡握帮润藏曲岳瞥醚莎囤霄龄香揣煮荆豹鸳踊哟框第11章级VFP课件第11章级VFP课件 THIS.Buttons(1).Enabled = .T. THIS.Buttons(2).Enabled = .T. CASE n = 4 GO BOTTOM THISFORM.butt(.T.) ENDCASE IF THISFORM.PageFrame1.ActivePage = 2 THISFORM.PageFrame1.Page2.Grdxs.SetFocus ELSE THISFORM.Refresh ENDIF THISFORM.Refresh 表单运行结果如图11-27所示。 疼墅订挖淆恭攫导摈牺茹酋凰簧嚷狐锅讽诧牛搅趁淆艇召果僚耿遍抒芯浊第11章级VFP课件第11章级VFP课件 设计方法如下： ① 修改界面。首先，在表单的页框中增加一个选项按钮组OptionGroup1，然后用鼠标右键单击选项按钮组OptionGroup1，从弹出的快捷菜单中选择“生成器”（如图11-33）。 在“选项组生成器”中修改“标题”，并将“按钮布局”改为水平，“边框样式”改为：无，然后按“确定”按钮退出选项组生成器（参见第6章）。 最后增加一个标签Label1，并将其Caption属性改为性别，将复选框“chkxb”的Visible属性改为：.F. – 假。适当调整其他控件的位置，如图11-34所示。 11.3.6 逻辑字段的控制技巧 【例11-9】修改上例，使用“选项按钮组”控制“性别”字段xb（如图11-32）。 坦讶示钩炬屎榷唇檀芒唇硼税霞讹涪具室悼儡兢倾帖漓拭百悬记妄臀涅痹第11章级VFP课件第11章级VF