“类浏览器”方法程序

下列是与“类浏览器”有关的方法程序。

AddClass( )

把一个类从一个类库 (.vcx) 复制到另一个类库中。在“类浏览器”实例之间进行拖放操作时使用此方法程序，并且依赖于 oSource 属性。如果指定的类不存在，则创建一个类。

AddFile( )

向“类浏览器”类列表中添加一个类库 (.vcx) 或表单 (.scx) 文件，如果没传送参数，则使用“类浏览器”GetFile( ) 方法程序来显示“添加文件”对话框。如果 lIgnoreRefresh 为“真”(.T.)，不进行“类浏览器”类列表的刷新。如果添加多个文件，必须在刷新列表前添加所有的类。

语法: AddFile([cFileName][, lIgnoreRefresh])

AddIn( )

向 Browser.dbf 注册表中安装或从中删除指定的加载项。

语法: AddIn(cName[, cProgram] [, cMethod] [, cFileFilter] [, cPlatform][, cComment])

参数

cName 指定加载项的名称，不区分大小写；但是，当在菜单上显示时，它的值按输入时的样子出现。
cProgram 指定程序 (PRG)、表单 (.scx)、应用程序 (.APP)、可执行文件 (.EXE) 或将运行的已编译程序 (.FXP) 的名称。如果未提供扩展名，则假定为 .PRG；如果提供了指定类库 (.vcx) 和新类的名称，则在该库中创建新类。
注释如果此参数为 .NULL.，则在 Browser.dbf 中对加载项做删除标记，并在加载项快捷菜单中禁止使用。
cMethod 指定作为事件钩的方法程序名。如果为空，则加载项出现在菜单上。
cFileFilter 指定能够使用加载项的类库和表单的列表。如果为空，则加载项可供全部类库 (.vcx) 和表单 (.scx) 使用。
cPlatform 指定可以使用加载项的平台。如果为空，则可在 Visual FoxPro 支持的所有平台上使用加载项。
cComment 指定存储在 Browser.dbf 的备注字段中的文本。

AddInMenu( )

展开显示注册的加载项的菜单。

AddInMethod( )

对指定的对象方法程序执行任意的注册加载项。

语法: AddInMethod(cObjMethod)

示例: 若要更改“类浏览器”中“帮助”按钮的默认行为，可使用以下代码：

_OBROWSER.AddInMethod("cmdHelp.click")

AutoRefresh( )

通过检查类列表中选定类的更新的类库 (.vcx) 信息和对正在编辑的类库 (.vcx) 文件中记录的总数进行检查，决定是否刷新显示。当激活“类浏览器”表单时运行本方法程序。

BinToInt( )

返回一个与二进制数字符串相等的整数。例如，向该方法程序中传递一个为“11001”的 cBinaryValue 值，将返回 25。

语法: BinToInt([cBinaryValue])

CleanUpFile( )

从与类列表中选定类相关的类库 (.vcx) 文件中移去记录。

ClearBrowser( )

仅供内部使用。

ClearClass( )

用 CLEAR CLASS 命令从内存中清除对指定类的高速缓存。如果 lClearAll 设置为“真”(.T.)，则清除对所有显示类的高速缓存。

语法: ClearClass([lClearAll])

NewClass( )

在类列表中创建选定类的一个子类。

DeactivateMenu( )

使加载项弹出式菜单变为不活动。

DisplayMenu( )

在当前鼠标指针位置显示快捷菜单。如果 tnMenuMode 为 0，将显示“类浏览器”表单的快捷菜单；如果为 1，将显示“类”列表的快捷菜单；如果为 2，将显示“成员”列表的快捷菜单。

语法: DisplayMenu(tnMenuMode)

DoAddIn( )

执行具有 BROWSER 别名的表中当前或指定记录的指定加载项。

语法: DoAddIn([cAddInName])

FileMatch( )

对指定文件和指定的文件列表进行比较，确定该文件是否与加载项有关。

语法: FileMatch(cFileName, cFileList)

ExportClass( )

生成并显示类列表中选定类或选定文件的定义源代码。

语法: ExportClass([lShow] [,tcExportToFileName])

参数

lShow 指定是否显示代码。如果参数 lShow 为“真”(.T.)，则“类浏览器”窗口显示代码。
tcExprotToFileNmae 指定接受代码的文件的名称。

FindClass( )

在类中查找类文本。

语法: FindClass([cFind])

FormAddObject( )

向外部表单中添加一个类列表选定类的实例。

语法: FormAddObject(oObject [, nXCoord] [, nYCoord] [, lActivateForm] [, lDesignMode][, lNoShow] [, lNoErrors] [, lBuilder] [, oForm])

参数

oObject 指定对目的容器的引用。此值或者是用于“命令”窗口的“command”、用于Visual FoxPro 中桌面的“screen”，或者是“new”。您可以使用以下命令实现这些选项。
```
_oBrowser.FormAddObject(“command”)
_oBrowser.FormAddObject(“-screen”)
_oBrowser.FormAddObject(“new”)
```
nXCoord 指定容器中对象的水平位置。如果没有传送此值，则使用当前的鼠标位置。
nYCoord 指定容器中对象的垂直位置。如果没有传送此值，则使用当前的鼠标位置。
lActivateForm 如果为“真”(.T.)，则在添加对象时激活目的表单；如果为“假”(.F.)，则“类浏览器”仍为活动的。
lDesignMode 如果为“真”(.T.)，则对象引用是“表单设计器”或“类设计器”中的当前对象。
lNoShow 如果为“真”(.T.)，则对象引用是“表单设计器”或“类设计器”中的当前对象。
lNoErrors 指定是否忽略实例化时产生的错误。如果为(.F.)，在“类设计器”中显示错误。
lBuilder 指定在向容器添加对象后是否启动自定义生成器。
oForm 指定向其中添加对象的容器。 oForm 是一个可选的参数，它主要用于在设计模式下包含宿主对象。

FormatMethods( )

格式化在类定义代码的显示中生成的方法程序文本。

语法: FormatMethods(cMethods)

FormatProperties( )

格式化在类定义源代码的显示中生成的属性文本。

语法: FormatProperties(cProperties [, lAddObjectMode])

GetFile( )

打开“类浏览器”的 GetFile( ) 对话框，GetFile( ) 方法程序供“类浏览器”“打开”或“添加”按钮内部使用。不论何时“类浏览器”提示类库 (.vcx) 或表单 (.scx) ，都在内部调用了 GetFile( ) 方法程序。

语法: GetFile([cFileExt])

GetTimeStamp( )

返回一个与时间戳相等的字符值。如果没有传递参数，返回当前所选定文件的时间戳字符串。

语法: GetTimeStamp([ntimestamp])

IndentText( )

使文本块缩进一个制表符。

语法: IndentText(cCode)

IntToBin( )

返回一个与整数相等的二进制数字符串。例如，向该方法程序中传递的 nInteger 值为 25，将返回“11001”。

语法: IntToBin([nInteger])

ModifyClass( )

在“类设计器”中打开选定类。

MsgBox( )

显示“类浏览器”信息框，它与 Visual FoxPro 的 MESSAGEBOX( ) 功能相似。

语法: MsgBox(cMessage [, nType] [, cTitle])

NewFile( )

创建一个新的类库 (.vcx) 文件。如果没有传送参数，则显示“打开”对话框。如果提供了参数，则生成一个新的类库 (.vcx) 并将其添加到“类浏览器”的类列表中。

语法: NewFile([cFileName] [, lOpenFile])

OpenFile( )

打开一个存在的类库 (.vcx) 或表单 (.scx) 文件。如果未提供文件名，则显示“打开”对话框。

语法: OpenFile([cFileName])

ProperBaseClass( )

返回以首字母大写的基类名。例如，对“combobox”返回“ComboBox”。

语法: ProperBaseClass(cBaseClass)

RedefineClass( )

更改类列表中选定类的父类。

语法: RedefineClass([cAsClass] [, cClassLoc])

RefreshButtons( )

按照文件类型刷新“类浏览器”命令按钮。

RefreshClassIcon( )

从图标文件中重新装载类图标。

RefreshClassList( )

刷新类列表。

语法: RefreshClassList([cDefaultClass] [, lIgnoreTable])

RefreshClassListSubclass( )

仅供内部使用。

RefreshFileAttrib( )

刷新与类列表中选定类相关的文件名的文件属性状态。

RefreshCaption( )

刷新一个表单的“类浏览器”标题。

RefreshDescriptions( )

仅供内部使用。刷新类和成员的说明。

RefreshMembers( )

刷新“成员”选项卡，以显示与类列表中选定类和指定成员（若提供）相关的信息。

语法: RefreshMembers([tcDefaultMember])

RefreshParentClassBrowser( )

刷新“父类浏览器”工具栏的状态。

RefreshPrefRecNo( )

刷新 Browser.dbf 中对应于正在编辑的类库 (.vcx) 或表单 (.scx) 文件的优先记录指针。

RefreshRecNo( )

刷新类库 (.vcx) 或表单 (.scx) 中对应于选定类文件的当前记录指针。

RemoveClass( )

从与其相关的类库 (.vcx) 文件中删除类列表中的选定类。

语法: RemoveClass([lConfirm])

RenameClass( )

更改类列表中选定表的类名。

语法: RenameClass([cToClass])

ResetDefaults( )

恢复原始的显示设置。当您从快捷菜单中选择了“还原到默认值”选项时，会调用该方法程序。

SavePreferences( )

存储对 Browser.dbf 注册表的当前优先设置。

ScaleResize( )

按比例缩放“类浏览器”表单中的控件，以适应在使用 Resize( ) 事件调整表单大小之后的情况。

SeekClass( )

将类列表指针移至类列表中特定类或索引上，可使用类列表中可视位置对应的数值。

语法: SeekClass([cClass][, cClassLibrary])

SeekMember( )

将成员列表指针移至特定的成员上。

语法: SeekMember(tcMember)

SeekParentClass( )

显示类列表中选定类的父类。

SetBusyState( )

根据所接收的参数把 lBusyStatus 属性设置为“真”(.T.) 或“假”(.F.)；也可把鼠标指针形状设置为箭头或沙漏。

语法: SetBusyState(lBusyState)

SetFont( )

对“类浏览器”的表单、控件和对话框所使用的字体和字体大小进行设置。如果没有指定字体名或字号，SetFont( ) 将打开“字体”对话框。

语法: SetFont([cFontName][, nFontSize][, lFontBold][, lFontItalic])

ShowMenu( )

显示基于数组的菜单。如果菜单是一维数组，则该方法程序可显示菜单中全部项的列表。如果数组是关于项和行为的二维数组，则它显示菜单项，并在选择项时，执行相关的行为。

语法: ShowMenu(aMenu[, cOnSelection])

TrimExt( )

截去文件名的扩展名。

语法: TrimExt(cFileName [, lPlatformType])

TrimFile( )

截去文件名，并只返回文件名和路径。

语法: TrimFile(cFileName [, lPlatformType])

TrimPath( )

截去路径名。

语法: TrimPath(cFileName [, lTrimExt] [, lPlatformType])

UpdateReferences( )

当重命名一个类，或将一个类由某个类浏览器移至另一类浏览器中时，使用该函数更新类（子类和对象成员）的引用。

语法: UpdateReferences(tcOldClassLoc, tcOldClass, tcNewClassLoc, tcNewClass [, tlAllInstances])

参数

tcOldClassLoc 指定类库 (.vcx) 或表单 (.scx) 文件中 ClassLoc 字段的原始内容。
tcOldClass 指定类库 (.vcx) 或表单 (.scx) 文件中 Class 字段的原始内容。
tcNewClassLoc 指定类库 (.vcx) 或表单 (.scx) 文件中 ClassLoc 字段的新内容。
tcNewClass 指定类库 (.vcx) 或表单 (.scx) 文件中 Class 字段的新内容。
tlAllInstances 如果为“真”(.T.)，将更新所有“类浏览器”窗口中的所有文件；如果为“假”(.F.)，只更新当前“类浏览器”窗口中的文件。

VersionCheck( )

检查打开的类库 (.vcx) 或表单 (.scx) 文件。

语法: VersionCheck([lShowErrorMsg])

ViewProperty( )

显示所选类的特定属性值。

语法: ViewProperty(cProperty)

WildcardMatch( )

将“类型”框中指定的筛选条件与通配符字符串进行比较。

语法: WildcardMatch(cMatchExpList, cExpressionSearched)