Clarion Community Help

DROPID( signature [, signature] )

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

  ADD(Que2)           !and add it to the queue

 END

END

See Also:

DRAGID