ディスパッチ ポインタを指定された COM オブジェクトをリリースします。COM サーバに接続した後に取得したすべての内部 IDispatch ポインタへの参照がリリースされます。必要なくなると同時にサーバのオブジェクトに COM_ReleaseDispatch_ を呼び出す必要があります。
COM_releaseDispatch_ ( serverHandle As User ) As Any
引数 | [タイプ] | 説明 |
---|---|---|
serverHandle | User | IDispatch ポインタ |
Method getColorSchemeName(index As Integer) As String
Dim inventor As User = COM_connectRunningServer_("Inventor.Application")
Dim colorScheme As User = COM_getProperty_(inventor, "ColorSchemes", checkArguments? := True, index)
Dim displayName As String = COM_getProperty_( colorScheme, "Name")
COM_releaseDispatch_( colorScheme ) ' if you forget to release colorScheme, the next call will do this
COM_releaseDispatch_( inventor)
Return displayName
End Method