あぶすとらくと

配置したコントロールのEvent HandlerのOpenにドラッグ＆ドロップを許可するファイルタイプを記述。

Windows1>Control>Canvas1>Open

Me.AcceptFileDrop("image/jpeg")

Windows1>Control>Canvas1>Drop Object

　//ドロップされたJPEGを背景に設定
  If Obj.PictureAvailable Then
    Me.Backdrop = obj.Picture
  ElseIf Obj.FolderItemAvailable Then
    Me.Backdrop = Picture.Open(obj.FolderItem
    //ドロップされたファイルのパスをTextField1に表示
    TextField1.text =obj.FolderItem.AbsolutePath
  End If

RectControl.DropObject ( Obj as DragItem, Action as Integer )
http://docs.xojo.com/index.php/RectControl.DropObject
DragItem
http://docs.xojo.com/index.php/DragItem
DragItem.FolderItem
http://docs.xojo.com/index.php/DragItem.FolderItem