PowerBuilder à Donf ! / [SOURCE] Connaitre la position de la souris

ydl · 17-02-2010 17:08:33

Je cherche un moyen de connaitre les coordonnées de la souris lors d'un drag and drop.
Une sorte de DragOver.
Le propos est de savoir ou je large mon objet dans un ole gantt.
Voici l'objet (http://www.dbi-tech.com/ProductPage_Sol … edule.aspx)

Merci pour vos lumières.

Dernière modification par ydl (06-05-2011 12:09:33)

ydl · 06-05-2011 12:07:50

Bonjour
J'ai trouvé une solution en passant par les api

Local external code

Code: pb

FUNCTION boolean GetCursorPos(ref mousepos mousepos2) LIBRARY "User32.dll"
FUNCTION long GetWindowRect( long hwnd, ref rect rect2) LIBRARY "User32.dll"

Création de deux structures dans la fenêtre

Code: pb

//MOUSEPOS
long xpos
long ypos

//RECT
long left
long top
long right
long bottom

Code dragdrop

Code: pb

mousepos mouseloc
rect rectparent
GetWindowRect(handle(parent),rectparent)

long l_voffset//-30
GetCursorPos(mouseloc)

l_voffset=this.y/3.6


xa=mouseloc.xpos - rectparent.left
ya=mouseloc.ypos - rectparent.top - l_voffset