Gibt das COM-Objekt entsprechend dem Dispatch-Zeiger zurück. Die Referenzen auf alle nach der Verbindung zum COM-Server erworbenen inneren IDispatch-Zeiger werden freigegeben. Sie müssen COM_ReleaseDispatch_ für das Serverobjekt aufrufen, sobald es nicht mehr benötigt wird.
COM_releaseDispatch_ ( serverHandle As User ) As Any
Argument | Typ | Beschreibung |
---|---|---|
serverHandle | User | IDispatch-Zeiger |
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