hi Luis, hi all!

The volker rebsite doesn't contain this .r

Someone has it ?




----- Original Message -----
From: "Luis Rodr�guez Jurado" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, April 03, 2002 5:43 AM
Subject: [REBOL] Re: Drag and Drop Object


> Hi,  Philippe
> From rebsite: rebol.com/Sites/Volker/dragdrop/howto-Demo.r , and another
> examples.
> Luis.
>
> REBOL [title: "dragdrop basics from howto"]
> view layout [ size 240x240
>  style dragbox box 40x40 font-size 11 feel [
>   engage: func [face action event] [
>    if action = 'down [
>     face/data: event/offset
>     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
>    ]
>    show face
>  ]   ]
>  dragbox "Box 1" navy
>  dragbox "Box 2" teal
>  dragbox "Box 3" maroon
>  dragbox "Box 4" gold
> ]
>
>
> > Hi !
> >
> > Is there anyone who developed a drag and drop object or just methods to
do
> > it ?
> >
> > I saw that it was already done when the FTPGadget.exe was released 2
> months
> > ago but its objects are not available.
> >
> > Philippe
> >
> > --
> > To unsubscribe from this list, please send an email to
> > [EMAIL PROTECTED] with "unsubscribe" in the
> > subject, without the quotes.
> >
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.
>

-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to