ComObjActive

登録されている COM オブジェクトを取得します。

ComObj := ComObjActive(CLSID)

パラメータ

CLSID

型：文字列

取得する COM オブジェクトの CLSID または人間が読み取れる Prog ID。

戻り値

型：ComObject

この関数は、バリアントタイプVT_DISPATCH(9)を持つ新しいCOMラッパーオブジェクトを返す。

エラー処理

失敗した場合は例外がスローされます。

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

例

Microsoft Wordが起動している場合、アクティブな文書を表示します。以下で使用するCOMオブジェクトとそのプロパティの詳細については、Word.Applicationオブジェクト（Microsoft Docs）をご覧ください。

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