setdropid_set_dropid_return_string

Navigation: Language Reference > 13 - Built-in Functions >====== SETDROPID (set DROPID return string) ======

SETDROPID( string )

SETDROPID	Sets the DROPID procedure's return value.
string	A string constant or variable containing the value the DROPID procedure will return.

The SETDROPID procedure sets the DROPID procedure's return value. This allows the DROPID procedure to pass the data in a drag-and-drop operation. When drag-and-drop operations are performed between separate Clarion applications, this is the mechanism to use to pass the data.

Example:

Que1 QUEUE

STRING(30)

END

Que2 QUEUE

STRING(30)

END

WinOne WINDOW,AT(0,0,160,400)

LIST,AT(120,0,20,20),USE(?List1),FROM(Que1),DRAGID('List1')

!Allows drags, but not drops

LIST,AT(120,120,20,20),USE(?List2),FROM(Que2),DROPID('List1')

!Allows drops from List1 or the Windows File Manager,

!but no drags

END

CODE

OPEN(WinOne)

ACCEPT

CASE EVENT()

OF EVENT:Drag !When a drag event is attempted

IF DRAGID() !check for success

SETDROPID(Que1) !and setup info to pass

END

OF EVENT:Drop !When drop event is successful

Que2 = DROPID() !get dropped info, from List1 or File Manager

ADD(Que2) !and add it to the queue

END

See Also:

DRAGID

DROPID