A drag operation can be thought of as passing two strings from the source object to the target object. The two strings are the dragtype string and the dragdata string.

 

The following code is a response for a source object:

 

response to ReportIcon_IR

    on drag

# dragtype string is "Report"

# dragdata string is "myreport.txt"

drag "myreport.txt" type "Report"

using icon "report.ico"

 

The following code is a response for a target object:

 

response to PrinterIcon_IR

    on dragover

if (dragtype = "Report") then 

allow drop

end if

 

on drop

if (dragtype = "Report") then

copy dragdata to FileName_SV

call PrintReport( FileName_SV )

end if