DragDrop en un ttabcontrol

[jose.luis]

Hola,
Al hacer una operación de Drag desde un ArrayBrowse y el Drop en un
tTabControl... ¿como puedo saber sobre cual pestaña del ttabcontrol se ha
hecho el Drop?
Saludos,
José Luis Capel

[_support_]

José Luis,
Puedes utilizar el método no documentado (y espero que nadie se moleste por
no estarlo) HitTest( x, y) que retorna una matriz de dos elementos, y en el
primero indica el número de pestaña donde se encuentra dicha coordenada.
Un saludo,
"José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
news:44ec43a9$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Hola,
>
> Al hacer una operación de Drag desde un ArrayBrowse y el Drop en un
> tTabControl... ¿como puedo saber sobre cual pestaña del ttabcontrol se ha
> hecho el Drop?
>
> Saludos,
> José Luis Capel
>

[jose.luis]

Ignacio,
Gracias por la respuesta.
Mirando en la documentación veo que el método HitTest está documentado para
algunos controles. No acabo de ver claro que son los parámetros x e y. En
la documentación indica:
Parámetros
<nX>
Coordenada X
<nY>
Coordenada Y
Pero no especifica si son coordenadas relativas al control sobre el que
está, al formulario o a la pantalla.
Y en el evento DragOver y EndDrag tampoco sabría como averiguar esas dos
coordenadas. ¿Puedes ayudarme con estas dudas?
Gracias!
José Luis Capel
"Ignacio Ortiz de Zúñiga" <_support_@xailer.com> escribió en el mensaje
news:[email=44ed5c7e@news.xailer.com...]44ed5c7e@news.xailer.com...[/email]
> José Luis,
>
> Puedes utilizar el método no documentado (y espero que nadie se moleste
> por no estarlo) HitTest( x, y) que retorna una matriz de dos elementos, y
> en el primero indica el número de pestaña donde se encuentra dicha
> coordenada.
>
> Un saludo,
>
> "José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
> news:44ec43a9$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Hola,
>>
>> Al hacer una operación de Drag desde un ArrayBrowse y el Drop en un
>> tTabControl... ¿como puedo saber sobre cual pestaña del ttabcontrol se ha
>> hecho el Drop?
>>
>> Saludos,
>> José Luis Capel
>>
>
>

[jose.luis]

Ignacio,
¿Crees que podría ser interesante añadir las coordenadas x e y del ratón
como parámetros en los métodos begindrag, dragover y enddrag?
Saludos,
José Luis Capel
"Ignacio Ortiz de Zúñiga" <_support_@xailer.com> escribió en el mensaje
news:[email=44ed5c7e@news.xailer.com...]44ed5c7e@news.xailer.com...[/email]
> José Luis,
>
> Puedes utilizar el método no documentado (y espero que nadie se moleste
> por no estarlo) HitTest( x, y) que retorna una matriz de dos elementos, y
> en el primero indica el número de pestaña donde se encuentra dicha
> coordenada.
>
> Un saludo,
>
> "José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
> news:44ec43a9$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Hola,
>>
>> Al hacer una operación de Drag desde un ArrayBrowse y el Drop en un
>> tTabControl... ¿como puedo saber sobre cual pestaña del ttabcontrol se ha
>> hecho el Drop?
>>
>> Saludos,
>> José Luis Capel
>>
>
>

[jfgimenez]

José Luis,
> ¿Crees que podría ser interesante añadir las coordenadas x e y del ratón
> como parámetros en los métodos begindrag, dragover y enddrag?
La función GetCursorPos() te da las coordenadas que tenía el cursor en el
momento de dispararse el mensaje correspondiente. Puedes usarla de 2 formas:
GetCursorPos( @x, @y )
o
GetCursorPos() -> { x, y }
En ambos casos te da las coordenadas relativas a la pantalla, no al control,
por lo que tendrías que convertirlas con :ScreenToClient()
--
Un saludo,
José F. Giménez
http://www.xailer.com

[jose.luis]

José,
Perfecto!! Ya tengo drag-and-drop funcionando al 100x100!
Muchas gracias,
José Luis Capel
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:44ede505$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> José Luis,
>
>> ¿Crees que podría ser interesante añadir las coordenadas x e y del ratón
>> como parámetros en los métodos begindrag, dragover y enddrag?
>
> La función GetCursorPos() te da las coordenadas que tenía el cursor en el
> momento de dispararse el mensaje correspondiente. Puedes usarla de 2
> formas:
>
> GetCursorPos( @x, @y )
>
> o
>
> GetCursorPos() -> { x, y }
>
> En ambos casos te da las coordenadas relativas a la pantalla, no al
> control, por lo que tendrías que convertirlas con :ScreenToClient()
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
>