| Navigation: Language Reference > 13 - Built-in Functions >====== SETCLIPBOARD (set windows clipboard contents) ====== |    |
SETCLIPBOARD( string )
| SETCLIPBOARD | Puts information in the Windows clipboard. |
| string | A string constant or variable containing the information to place in the Windows clipboard.This should not contain any embedded null characters (ASCII 0). This is placed in the CF_TEXT format, only. |
The SETCLIPBOARD procedure places the contents of the string into the Windows clipboard, overwriting any previous contents.
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, but no drags
END
CODE
OPEN(WinOne)
ACCEPT
CASE EVENT()
OF EVENT:Drag !When a drag event is attempted
IF DRAGID() !check for success
SETCLIPBOARD(Que1) !and setup info to pass
END
OF EVENT:Drop !When drop event is successful
Que2 = CLIPBOARD() !get dropped info
ADD(Que2) !and add it to the queue
END
END
See Also: