打开一个包含类定义的可视类库(.vcx)。


SET CLASSLIB TO ClassLibraryName [IN APPFileName \| EXEFileName] [ADDITIVE] [ALIAS AliasName]

参数

TO ClassLibraryName
指定要打开的 .vcx 可视类类名。如果 ClassLibraryName 没有包含完整有效的路径，则 Visual FoxPro 首先在默认的Visual FoxPro目录中查找可视类库，然后在 Visual FoxPro 路径下的各目录中查找。默认 Visual FoxPro 目录由 SET DEFAULT 命令指定，Visual FoxPro 搜索路径由 SET PATH 命令指定。发出不带ClassLibraryName的 SET CLASSLIB TO 命令，将关闭所有打开的可视类库。使用 RELEASE CLASSLIB 命令关闭某个个别的可视类库。

IN APPFileName| EXEFileName
指定一个包含可视类库的 Visual FoxPro 应用程序文件(.app)或可执行文件(.exe)。

ADDITIVE
打开 .vcx 可视类库时不关闭任何当前打开的 .vcx 可视类库。如果省略该子句，则关闭所有打开的 .vcx 可视类库。

ALIAS AliasName
为可视类库指定一个别名。通过它的别名可以引用可视类库。例如，以下命令打开名为MyClass的 .vcx 可视类库，赋予别名 MyCntrls，然后创建 MyButton 控件。
复制代码
SET CLASSLIB TO MyClass ALIAS MyCntrls mMyButton = CREATEOBJ('MyCntrls.MyButton')

	复制代码
SET CLASSLIB TO MyClass ALIAS MyCntrls mMyButton = CREATEOBJ('MyCntrls.MyButton')

说明

当运行 CREATEOBJECT( )、 DEFINE CLASS 中的ADD OBJECT ，或AddObject 方法时，Visual FoxPro 按以下位置和顺序搜索类定义，类定义定义了这些命令指定的对象：

Visual FoxPro 基本类。
按载入顺序搜索内存中的类定义。
当前程序中的类定义。
由SET CLASSLIB命令打开的.vcx可视类库中的类定义。
由SET PROCEDURE命令打开的过程文件中的类定义。
Visual FoxPro 程序运行链中的类定义。
OLE 注册，如果 SET OLEOBJECT 设置为 ON。

如果包含对象的类定义没有找到，Visual FoxPro 将产生一条错误信息。

示例

下例用 CREATE CLASSLIB 创建名为myclslib的可视类库。创建基于Visual FoxPro的表单(Form)基本类的 myform 类，并存储在 myclslib 可视类库中。SET CLASSLIB 用来打开 myclslib 可视类库，以便使用其中的类。

CREATE CLASSLIB myclslib     && 创建新的 .VCX 可视类库
CREATE CLASS myform OF myclslib AS "Form"  && 创建新类 
SET CLASSLIB TO myclslib ADDITIVE     && 打开 MyClsLib.VCX

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。