关于VFP的表单的问题!
2个回答
2011-07-13
展开全部
关于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 =......喜居宝地千年旺 福照家门万事兴 喜迎新春
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 =......喜居宝地千年旺 福照家门万事兴 喜迎新春
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询