ComObjActive

检索注册的 COM 对象.

ComObj := ComObjActive(CLSID)

参数

CLSID

类型: 字符串

要检索的 COM 对象的 CLSID 或可读的 Prog ID.

返回值

类型: ComObject

该函数返回一个新的 COM 封装对象, 其变体类型为 VT_DISPATCH (9).

错误处理

失败时抛出异常.

ComValue, ComObject, ComObjGet, ComObjConnect, ComObjFlags, ObjAddRef/ObjRelease, ComObjQuery, GetActiveObject (Microsoft Docs)

示例

如果 Microsoft Word 正在运行, 显示其活动文档的路径. 有关下面使用的 COM 对象和其属性的详情, 请参阅 Word.Application object (Microsoft Docs).

word := ComObjActive("Word.Application")
if !word
    MsgBox "Word isn't open."
else
    MsgBox word.ActiveDocument.FullName