I got this code so far

  Dim d As DragItem
  d= NewDragItem(me.Left, me.Top, me.Width, me.Height)
  d.PrivateMacData ("RBRC") "PushButton"
  d.Drag
  return true

but it's not working

I want to drag a picture of a pushbutton to a blank window and when the user drops the picture a push button is created

I saw a example a while ago and looked for it in the archives but couldn't find it

Brian
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to