The function get-i-dispatch-name returns the foreign name of an i-dispatch
interface. That is, it obtains the first return value of ITypeInfo::GetDocumentation
.
If TypeOf objMap.Selection Is Pushpin Then
...
you would need something like:
(if (equalp (com:get-i-dispatch-name selection)
"PushPin")
...)
print-i-dispatch-methods
i-dispatch
create-object
create-instance-with-events
Starting a remote Automation server
LispWorks COM/Automation User Guide and Reference Manual - 14 Feb 2015