M O D IFY CLASS 命 令

M O D IFY CLASS 命 令 - 图1M O D IFY CLASS 命 令 - 图2打开类设计器 让用户修改已有的类定义或创建新的类定义

语 法

MODIFY CLASS C lassName [OF ClassLibraryName1 ] [AS cBaseClassName [FROM ClassLibraryName2 ]] [METHOD MethodName] [NOWAIT] [SAVE]

参 数 描 述

C lassName

M O D IFY CLASS 命 令 - 图3指 定 要 修 改 或 创 建 的 类 定 义 名 称

OF C lassLibraryName1

M O D IFY CLASS 命 令 - 图4M O D IFY CLASS 命 令 - 图5M O D IFY CLASS 命 令 - 图6M O D IFY CLASS 命 令 - 图7指 定 含 有 这 个 类 定 义 的 .VCX 可 视 类 库 名 称 若 创 建 新 类 并 且 .VCX 可 视 类库 已 经 存 在 那 么 把 类 定 义 添 加 到 库 中

M O D IFY CLASS 命 令 - 图8M O D IFY CLASS 命 令 - 图9M O D IFY CLASS 命 令 - 图10VCX 是可视类库的默认扩展名 当指定的可视类库扩展名不是 .VCX 时 应指定扩展名

M O D IFY CLASS 命 令 - 图11如果指定的 .VCX 可视类库位于当前 SET CLASSLIB 命令设置的搜索列表中 那么将把

M O D IFY CLASS 命 令 - 图12这个类库从搜索列表中移去

AS cBaseClassName

M O D IFY CLASS 命 令 - 图13M O D IFY CLASS 命 令 - 图14M O D IFY CLASS 命 令 - 图15M O D IFY CLASS 命 令 - 图16M O D IFY CLASS 命 令 - 图17M O D IFY CLASS 命 令 - 图18指 定 类 定 义 的 基 类 cBaseClassName 可 以 是 V isual FoxPro 基 类 中 除Column Cursor DataEnvironment Header Page 和 Relation 之 外 的 任 何类

M O D IFY CLASS 命 令 - 图19M O D IFY CLASS 命 令 - 图20若省略 AS cBaseClassName 参数 则类定义派生于 V isual FoxPro 的 FormSet 基类

F R O M ClassLibraryName2

M O D IFY CLASS 命 令 - 图21M O D IFY CLASS 命 令 - 图22指 定 .VCX 可 视 类 库 名 该 库 中 包 含 cBaseClassName 指 定 的 用 户 自 定 义 类

M E T H O D MethodName

M O D IFY CLASS 命 令 - 图23M O D IFY CLASS 命 令 - 图24M O D IFY CLASS 命 令 - 图25M O D IFY CLASS 命 令 - 图26M O D IFY CLASS 命 令 - 图27M O D IFY CLASS 命 令 - 图28M O D IFY CLASS 命 令 - 图29M O D IFY CLASS 命 令 - 图30指 定 在 类 设 计 器 中 打 开 代 码 窗 口 的 事 件 或 方 法 M E T H O D 子 句 让 您在 类 设 计 器 中 立 即 开 始 编 辑 事 件 或 方 法 代 码

M O D IFY CLASS 命 令 - 图31M O D IFY CLASS 命 令 - 图32M O D IFY CLASS 命 令 - 图33MethodName 支持 Visual FoxPro 对象 语法 例如 用下面的命令可以立即编辑可视类库 MyClassLibrary 中 MyClass 类的文本框 txtFirstName 的 Click 事件代码

MODIFY CLASS MyClass OF MyClassLibrary;

METHOD txtFirstName.Click

M O D IFY CLASS 命 令 - 图34M O D IFY CLASS 命 令 - 图35M O D IFY CLASS 命 令 - 图36M O D IFY CLASS 命 令 - 图37M O D IFY CLASS 命 令 - 图38M O D IFY CLASS 命 令 - 图39如果只在 METHOD 子句中包含了一个事件或方法 则为类的事件或方法打开 代码窗口 例如 用下面的命令可以立即编辑可视类库 MyClassLibrary 中 MyClass 类的Click 事件代码

MODIFY CLASS MyClass OF MyClassLibrary METHOD Click

NOWAIT

M O D IFY CLASS 命 令 - 图40M O D IFY CLASS 命 令 - 图41M O D IFY CLASS 命 令 - 图42M O D IFY CLASS 命 令 - 图43M O D IFY CLASS 命 令 - 图44M O D IFY CLASS 命 令 - 图45M O D IFY CLASS 命 令 - 图46在 打 开 类 设 计 器 后 程 序 继 续 执 行 程 序 不 必 等 待 类 设 计 器 关 闭 而 是 继 续 执 行MODIFY CLASS NOWAIT 行 后 面 的 语 句 若 在 程 序 中 使 用 MODIFY CLASS 命 令 时 省 略 N O W A IT 子 句 那 么 打 开 类 设 计 器 后 程 序 暂 停 执 行 直 到 关 闭类 设 计 器

M O D IFY CLASS 命 令 - 图47M O D IFY CLASS 命 令 - 图48M O D IFY CLASS 命 令 - 图49M O D IFY CLASS 命 令 - 图50M O D IFY CLASS 命 令 - 图51M O D IFY CLASS 命 令 - 图52NOWAIT 仅在程序中才有效 当在命令窗口中发出 MODIFY CLASS 时 该项无效 如果包含了 NOWAIT 和 METHOD 子句 一定要将 NOWAIT 放在 METHOD 子句之前否则会忽略 NOWAIT

S A V E

M O D IFY CLASS 命 令 - 图53M O D IFY CLASS 命 令 - 图54M O D IFY CLASS 命 令 - 图55M O D IFY CLASS 命 令 - 图56M O D IFY CLASS 命 令 - 图57M O D IFY CLASS 命 令 - 图58M O D IFY CLASS 命 令 - 图59激 活 另 一 窗 口 后 仍 保 持 类 设 计 器 打 开 如 果 省 略 S A V E 则 当 另 一 窗 口 激 活时 类 设 计 器 随 之 关 闭 从 命 令 窗 口 中 发 出 包 含 SAVE 子 句 的 命 令 时 将 无此 作 用

说 明

M O D IFY CLASS 命 令 - 图60M O D IFY CLASS 命 令 - 图61M O D IFY CLASS 命 令 - 图62M O D IFY CLASS 命 令 - 图63可利用 MODIFY CLASS 修改已有的类定义或创建新的类定义 并存入一个 .VCX 可视类库中 可以用 SET CLASSLIB 打开 .VCX 可视类库 并访问 .VCX 可视类库中的类定义

请 参 阅

ADD CLASS , CREATE CLASS , CREATE CLASSLIB , RELEASE CLASSLIB ,

SET CLASSLIB