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:

ParametersDescription
ctrlEntIDMust 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.

FormatDescription
TEXTSets textual data in both ANSI and Unicode format.
FILENAMESets a filename data format.
BITMAPSets BITMAP, a bit dta format. The data should be a bitmap path.
unicodeWhen 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.
dataThe 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 propertyDROPTARGET propertyCLEARDRAGDATA messageREMOVEDRAGDATA messageGETDRAGDATA 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
  • No labels