Mouse-click from a CommandManager.Pick( )

[Anonymous]

Hi folks,

(This is directly related to the other screen coordinate conversion post that I also made today, but is a different subject, so I made it a separate post).

With an IDW file open and with InteractionEvents configured and started, I am not receiving a mouse-click event from a CommandManager.Pick( ) action.  Is there any way to handle the mouse-click of a Pick( ) event to receive the ModelPosition (such as we would get from the usual mouse-click event handler) ?

Best regards,
--Jeff

[dgreatice]

Hi.

try this code at VBA macro. But it cant run at iLogic rule.

Public Sub ModelPosition()
    Dim oDWGdoc As DrawingDocument
    Set oDWGdoc = ThisApplication.ActiveDocument
   
    Dim oSheet As Sheet
    Set oSheet = oDWGdoc.ActiveSheet
   
    Dim CMDMan As CommandManager
    Set CMDMan = ThisApplication.CommandManager
   
    Dim oView As DrawingView
    Set oView = CMDMan.Pick(kDrawingViewFilter, "Select View")
   
    MsgBox oView.Position.X & vbLf & oView.Position.Y
   
End Sub