position souris en scroll

Invité · 02/05/2010, 18h36

Bonjour,
Mon probléme est le suivant: pour mettre en place des meubles sur un plan d'architecte, je fais déplacer un meuble sur un plan, le VBScript me donnes les coordonnées de la souris.
Il sagit d'un outil ne servant qu'a moi, donc pour IE uniquement.

Ma question est la suivante:
Le plan étant plus haut que l'écran, lorsque je place un meuble en bas, il y a scroll et ça fausse tout, le meuble ne suit plus la souris, mais est plus haut
en fonction du scroll.

Pourriez vous m'aider a aranger cela, merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
<HTML><BODY bgColor=#ffffff>
<DIV id=jaune style="POSITION: absolute; TOP: 700px;LEFT:1500px;Z-INDEX: 95">
</DIV>
<IMG src="lavarenne.jpg" style="LEFT: 0px;
POSITION: absolute; TOP: 0px;Z-INDEX: 2">
<IMG id=Limage src="bureau_jp.jpg" style="LEFT: 0px;
POSITION: absolute; TOP: 0px;Z-INDEX: 5">
<SCRIPT language=VBScript>
public w,nx,ny,xm,ym,xx,flag
Set w=document.body
sub window_onload()
 w.bgcolor="#ffffff"
 w.style.cursor="crosshair"
end sub
 
sub document_onmousemove()
 xm = window.event.clientX
 ym = window.event.clientY
 Limage.style.pixeltop=ym
 Limage.style.pixelleft=xm
 jaune.innerHTML="<FONT COLOR=#ff00ff><H3>" & xm & " " & ym
End Sub
</SCRIPT></BODY></HTML>

**Fredledingue** · 10/05/2010, 01h23

Pas vraiment de code tout fait à te proposer mais quelques mots clés pèchés ci et là:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
document.body.clientHeight
document.body.scrollTop
.offsetTop
.offsetHeight
.offsetWidth
.style.width
.style.top
.style.left

Atention: il faut parfois remplacer "px" par "" (rien) dans le résultat donné par ces méthodes.
Aussi je te conseille vivement d'utiliser du HTA (sauf si ton bazaar est en ligne).

Invité · 10/05/2010, 02h53

Merci a toi, je vais chercher dans ces directions

position souris en scroll

VBScript

Vue hybride

Discussions similaires

Partager

Partager