| 共 18 篇文章 |
|
VFP：【第一条】、【上一条】、【下一条】、【最后一条】命令按钮控件代码 一、在表单窗口单击右键，选择"代码"，在"过程"下拉列表框中选择"Init"，在下部代码窗口输入以下代码：Thisform.Thisform.refresh【上一条】click事件代码。thisform.refresh.thisform.refresh 【下一条】click事件代码。thisform.refre... 阅1682 转46 评0 公众公开 10-06-13 21:19 |
这些文件都可以使用数据表的操作命令，可以使用VFP的命令和函数来改变报表控件中一些值的大小，如在VFP命令窗口中对一个盘中已存在的名为"干部登记表"的报表文件进行操作：Objtype代表的是报表中的各控件的类型，下面列出的是报表设计器中各控件在数据表文件中的objtype的值：数据表中的vpos代表控件距报表左边的距离，hpos值为距报... 阅2178 转61 评0 公众公开 10-06-13 20:45 |
VFP组合框动态数据绑定实例之查找定位控件设计。对于经常用VFP编程和操作数据表的用户来说，做一个对任意VFP支持的数据表都能进行浏览和编辑的表单是非常必要的，在这个表单里，首先要有一个用来显示数据表的表格Grid控件，其次要有许多的命令按钮、组合框、文本框等控件，来执行对数据表进行筛选、定位、统计、修改等各种日常的操作。 阅170 转自悟静 公众公开 10-06-11 21:11 |
如何在VFP表格控件中用颜色区分特定的记录？在VFP里有几个有关表格的属性：下面两个它们是用来改变表格控件中某个单元格背景和前景的色彩。SetAll("dynamicbackcolor", "RGB值", "Column") Grid.SetAll("dynamicforecolor", "RGB值", "Column")SetAll("dynamicbackcolor&... 阅2590 转21 评0 公众公开 10-06-11 21:02 |
状态栏的属性之一STYLE，即上面所讲的两种显示模式，0 - Mutliple panels 和 1 - Single panel simple text 当为Single panel simple text 模式时，很方便的处理，只要指定状态的另一个属性 SimpleText即可，就象在操作VFP主窗口的状态栏时用 set message to 那么方便了，在这里就是thisform.OleStatus.SimpleText="新的字符串"即可... 阅31 转自悟静 公众公开 10-05-31 16:04 |
3、Child（子节点）：ThisForm.Tree.SelectedItem.Child.Key返回TreeView控件中当前选定的节点的第一个子节点的键值，如果该节点无子节点，该行代码会出错。10、Next：返回TreeView控件中同为Node节点的父节点的子节点的下一个兄弟节点的对象。11、Previous：返回TreeView控件中同为Node节点的父节点的子节点的前一个兄弟节点的对象。临时表LS1... 阅165 转自悟静 公众公开 10-05-31 16:04 |
文本框控件(常用按钮代码）文本框控件(textbox)主要用于接收或显示数据，在vfp中是一个常用控件，差不多每个程序都要用到它。关于文本框控件数据源的处理： 如果在表单中使用数据环境，可以在"数据环境设计器"中拖动表的各个字段到表单上，系统会自动生成各个字段对应的标签及文本框，并且文本框的数据源会自动与表中对应的字段绑... 阅48 转自悟静 公众公开 10-05-31 16:02 |
点查询 thisform.grid1.recordsource=’’ select rsda.bh,xm,xb from table where aa>1 into cursor lsb thisform.grid1.recordsource="lsb" 注意，你表格比如要显示bh,xm两列，但数据源中必须要有sno,bh,xm三列，则你必须写成bh,xm,sno，而不能写成sno,bh,xm,把显示不用的列写后面。 阅145 转自丁丁是我 公众公开 10-05-31 16:02 |
含GRID通用表单的设置Grid是VFP功能强大的表格(或者说网格)控件,它提供了比Browse窗口强大得多的控制方式。因此，我们将Grid控件的数据源RecordSource设为数据表(DBF文件)，其数据格式、显示方式及行列提示信息则分别由数据表RowMsg.DBF(控制表格的行即记录方面信息)、ColMsg.DBF(数据格式并控制Grid控件的列方面信息)进行控制。1.创建表RowMsg... 阅207 转自悟静 公众公开 10-05-31 15:57 |
thisform.grid1.recordsource=‘tablename‘&&恢复原表别名2 >thisform.grid1.recordsource=Nullthisform.grid1.recordsource=‘newtablename‘&&改变了别名3 >thisform.grid1.recordsource=Nullthisform.grid1.recordsource=‘select column1,column2 from tablename where column1=thisform.text1.value into cursor T... 阅26 转自丁丁是我 公众公开 10-05-31 15:57 |
