[REBOL] Re: More REBOL IOS questions.
From: ammon:rcslv at: 12-May-2002 13:54
Welcome to the IOS fold we will try to show you around a bit and perhaps you
will find it enjoyable enough to stay!
REBOL does support drag and drop, but you will find that the controls are
very different than those in other languages. Here is a quick and simple
view layout [
style dragbox box 40x40 font-size 11 feel [
engage: func [face action event] [
if action = 'down [
remove find face/parent-face/pane face
append face/parent-face/pane face
if find [over away] action [
face/offset: face/offset + event/offset - face/data
dragbox "Box 1" navy
dragbox "Box 2" teal
dragbox "Box 3" maroon
dragbox "Box 4" gold
It should be fairly simple to determine if you are dragging on top of another
item (hint: check the offset and the size) As Gregg mentioned I don't know
about the WM_DropFiles, but hey who knows what is possible.
A short time ago, Ed Dana, sent an email stating: