关于VFP的表单的问题！

关于VFP的表单的问题！

ject.AddObject(cName, cClass [, cOLEClass] [, aInit1, aInit2 ...])

参数

cName

指定引用新对象的名称。

cClass

指定添加对象所在的类。

cOLEClass

指定添加对象的 OLE 类。

注意 如果准备分发添加了要求许可键的 ActiveX 控件(例如, Microsoft Treeview 和 Listview 控件)的运行时应用程序, 不要用 AddObject(.....cOLEClass) 方法。代替以创建并保存一个你的 ActiveX 控件子类到一个 VCX 类库中。然后, 在运行时可以用 AddObject (或 NewObject) 方法来添加该包含你的控件的 OleControl 类。

aInit1, aInit2

指定传给新对象的 Init 事件的参数。

备注

调用 ADDOBJECT 方法时，将触发新添加对象的 Init 事件。在表单集中加入表单时，Load 事件在 Init 事件之前发生。

Note 当用 ADDOBJECT 方法往容器中加入对象时，对象的 Visible 属性设置为“假”(.F.)。因此您可以设置对象的属性，而不看更改对象外观时的一些中间效果。

如果动态地用 AddObject() 方法来添加一个 ActiveX 控件到表单, 如果控件要求特定的许可注册键而该注册键在目标机器上不可用的话, 则你的已分发应用程序会失败。许多 ActiveX 控件销售商要求这样的注册键来在设计时用 AddObject() 方法来管理这些控件。要避免该许可要求, 首先派生一个 ActiveX 控件到类库文件 (.vcx) 中, 然后在运行时动态地用 AddObject() 来添加一个子类的实例。可以总是注意你计划随同你的程序分发的 ActiveX 控件的销售商因为可能有其它你需要包含的独立的文件。

示例

下面的示例介绍怎样使用 addobject 方法将对象或控件添加到表单中。此例用 addobject 方法往表单中加入一个 line 控件和三个命令按钮。

line 控件和命令按钮的 visible 属性设置为“真”(.t.)。在默认情况下，将对象或控件添加到表单后，它们是不可见的。

frmMyForm = CREATEOBJECT('Form') &&创建一个表单

frmMyForm.Closable = .F. &&禁止控件菜单

frmMyForm.AddObject('shpLine','Line') &&添加一个 Line 控件 到表单

frmMyForm.AddObject('cmdCmndBtn1','cmdMyCmndBtn1') &&Up 命令按钮

frmMyForm.AddObject('cmdCmndBtn2','cmdMyCmndBtn2') &&Down 命令按钮

frmMyForm.AddObject('cmdCmndBtn3','cmdMyCmndBtn3') &&Quit 命令按钮

frmMyForm.shpLine.Visible = .T. &&让 Line 控件可见

frmMyForm.shpLine.Top = 20 &&指定 Line 控件行

frmMyForm.shpLine.Left = 125 &&指定 Line 控件列

frmMyForm.cmdCmndBtn1.Visible =......喜居宝地千年旺 福照家门万事兴 喜迎新春

1, 将表添加到表单的数据环境中(表单空白处点击右键, 选择数据环境)

2,在数据环境中,按住那个表不松, 拖动到表单中,松开后会自动创建一个表格控件, 数据源就是刚才那个表

3,在表单中放置一个按钮, caption为"新增", click代码为:

append blank

4,在表单中放置一个按钮, caption为"删除", click代码为:

delete

5,在表单的init事件中,输入代码:

set deleted on

6,运行表单,一个简单的编辑表数据的表单就可以用了.

ps.这只是最简单的功能, 如果要更高级,比如缓冲,需要更多的设置, 这里无法说明了

---