This message is used to set the data for a dragged data object
retVal = Send_Message(ctrlEntId,"SETDRAGDATA",format,unicode,data)
The function has the following parameters:
| Parameter | Description |
|---|---|
| ctrlEntID | Must be a current drag source control. |
| format | Name of the format you want to set. This can be a custom format or one of the following standard OpenInsight data formats. Format - Description TEXT - Sets textual data in both ANSI and Unicode format. FILENAME - Sets a filename data format. BITMAP - Sets BITMAP, a bit dta format. The data should be a bitmap path. |
| unicode | When using a custom textual format, set this flag to true for OpenInsight to perform a Unicode to UTF8/ANSI translation automatically if you know the data is Unicode string. |
| data | The data to be set. |
A boolean value. TRUE for successful, FALSE if unsuccessful.
The message can only be used during the DRAGSTART event for drag source control.
DRAGSOURCE property, DROPTARGET property, CLEARDRAGDATA message, REMOVEDRAGDATA message, GETDRAGDATA message
* Change the "TEXT" data being dragged
dragSource = Get_Property("SYSTEM","DRAGSOURCE")
data = Send_Message(dragSource,"GETDRAGDATA","TEXT","","")
if data _eqc 'Woodrow Wilson' then
newData = "Theodore Roosevelt"
data = Send_Message(dragSource,"SETDRAGDATA","TEXT","",newData)
end