Object: DropEvents

DIAdem 2018 Help


Edition Date: June 2018
Part Number: 370858P-01
View Product Info

DOWNLOAD (Windows Only)


DIAdem 2015 Help
DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help

The DropEvents object provides the events when dragging and dropping onto a REPORT object.

Note  To test the example script, you must first save the second script and register it as a user command in the dialog box that opens when you select Settings»Extensions»User Commands.

The example executes the user command MyOnDropPageEvent when dragging groups, channels, or events onto a worksheet. The user command displays the names of the elements that you dragged onto an object. In addition the user command displays to which position you dragged the elements:

Report.Events.OnDropPage = "MyOnDropPageEvent"

Sub MyOnDropPageEvent(Context, DropContext)
  Dim oMyDropElement, sOutput, oMyComment
  sOutput = "Names of dropped elements:"
  For Each oMyDropElement in DropContext.DiademElements
    sOutput = sOutput & VBCrLf & oMyDropElement.Name
  Next
  Call Msgbox(sOutput)
  Call MsgBox(Context.Sheet.Name & VBCrLf & Context.Position.X & VBCrLf & Context.Position.Y)
  Context.DoProceed = TRUE
End Sub

Returned From

Events.Drop

WAS THIS ARTICLE HELPFUL?

Not Helpful