>>>>
De nuevo con mis dudas, ¿como puedo saber la posicion de un control
con respecto a la pantalla?
<<<<
Para controles con la propiedad hWnd :
En un módulo :
Declare Function ClientToScreen Lib "user32" (ByVal hwnd As Long, lpPoint
As POINTAPI) As Long
Type POINTAPI
x As Long
y As Long
End Type
Para saber la posición :
Dim pos As POINTAPI
Dim res As Boolean
res = ClientToScreen(ElControl.hwnd, pos)
If res Then
'en pos.x y pos.y encontrarás la posición en pixels
End If
Un saludo.
_________________________________________________
José Rubí de la Vega
E-mail : jrubi@arrakis.es
WWW : http://www.arrakis.es/~jrubi
Podrás encontrar información sobre VB, la lista
VB-ESP y un resumen de los mensajes de la misma