Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

duda sobre Arrastrar y soltar objetos.

0 views
Skip to first unread message

Ezequiel Castro López

unread,
Jan 25, 1999, 3:00:00 AM1/25/99
to
Estoy tratando de generar un par de objetos que puedan arrastrarse hacia
otros objetos (imágenes) dentro de un formulario pero desonozco la
terminología al respecto o como hacerlo.
Pretendo hacer la operacion completa de arrastrar y soltar.

¿Alguien puede ayudarme?

Ezequiel Castro/México

Antonio M. Castaño

unread,
Jan 25, 1999, 3:00:00 AM1/25/99
to
Ezequiel:

Fijate en el help en lo métodos Drag, DragDrop y DragOver. También las
propiedades DragMode y DragIcon. Quizás también tengas que tener en cuenta
los métodos MouseDown, MouseUp y MouseMove.

Antonio


Ezequiel Castro López wrote in message ...

Carlos Yohn Zubiria

unread,
Jan 26, 1999, 3:00:00 AM1/26/99
to
En primer lugar deberás decidir si quieres que el acto de 'drag & drop' sea
automático (es decir que siempre que se pinche con el ratón se inicie una
acción de arrastrar) o bien manualmente en cuyo caso puedes poner en el
evento mousemove:

LPARAMETERS nButton, nShift, nXCoord, nYCoord
if nbutton = 1 && está pinchado el botón del ratón
this.drag && inicia la acción de arrastrar
endif

En segundo lugar determinar lo que quieras hacer en el control de destino
cuando el objeto esta encima de él. Esto se configura en el evento
'DragOver' (Por ejemplo cambiar el icono para que se vea que ahí se puede
soltar).

En tercer lugar determinar las acciones a realizar cuando el usuario suelta
el control origen encima del control destino. Esto se configura en el evento
'dragdrop'

En todos estos eventos, el sistema te da como parámetros el propio control
movido, y las posiciones del ratón.

Falta mucho por decir, pero si es como comienzo creo que te servirá. Mira la
ayuda y los ejemplos, que para eso están y viene bastante sobre esto.

--
Saludos,
-------------------------------------------------------
Carlos Yohn Zubiria
AGP
a...@kender.es
-------------------------------------------------------

0 new messages