SETDRAGDATA message
Description
This message is used to set the data for a dragged data object
Syntax
retVal = Send_Message(ctrlEntId,"SETDRAGDATA",format,unicode,data)
Parameters
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. |
Returns
A boolean value. TRUE for successful, FALSE if unsuccessful.
Remarks
The message can only be used during the DRAGSTART event for drag source control.
See Also
DRAGSOURCE property, DROPTARGET property, CLEARDRAGDATA message, REMOVEDRAGDATA message, GETDRAGDATA message
Example
* 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