Hello All,
I'm having trouble with a popup menu that I use a RightClick event. The
menu pops fine, but I still get the default RightClick menu from IE.
Is there a way to "disable" the menu? I'm not concerned with the person
looking at the code, it is so the user can manipulate images.
Any help is appreciated!
Todd
<HTML OnMouseDown="vbscript:DoRightClick">
<HEAD>
<TITLE></TITLE>
<style>
<!--
.skin0 {
position:absolute;
text-align:left;
width:200px;
border:2px solid black;
background-color:menu;
font-family:Verdana;
line-height:20px;
cursor:default;
visibility:hidden;
}
.skin1 {
cursor:default;
font:menutext;
position:absolute;
text-align:left;
font-family: Arial, Helvetica, sans-serif;
font-size: 10pt;
width:120px;
background-color:menu;
border:1 solid buttonface;
visibility:hidden;
border:2 outset buttonhighlight;
}
.menuitems {
padding-left:15px;
padding-right:10px;
}
-->
</style>
<script language="VBScript">
<!--
Sub ImgPallette_OnMouseDown(x,y,shift,button)
msgbox(window.event.button)
End Sub
Sub DoRightClick
Call testIt(MyX, MyY)
if MyX <> "" and MyY <> "" then
'MsgBox(MyX & vbcrlf & MyY)
document.all.ie5menu.style.left = MyX
document.all.ie5menu.style.top = MyY
document.all.ie5menu.style.visibility = "visible"
end if
window.event.cancelbubble = true
End Sub
Sub testIt(MyX, MyY)
if ((window.event.button AND 2)= 0) then exit sub
MyX = window.event.x
MyY = window.event.y
end Sub
Sub ChangeBack(CurrDiv)
Set CurrDiv = document.all.item("divOption" & CurrDiv)
if CurrDiv.style.color <> "white" then
CurrDiv.style.color = "white"
CurrDiv.style.backgroundcolor = "darkblue"
else
CurrDiv.style.color = "black"
CurrDiv.style.backgroundcolor = "menu"
end if
End Sub
Sub CloseMenu()
if document.all.ie5menu.style.visibility = "visible" then
document.all.ie5menu.style.visibility = ""
End Sub
-->
</script>
</HEAD>
<BODY BGCOLOR="silver" TEXT="#000000" LINK="#0000FF" VLINK="#800080">
<form name="ImgPallette">
<div id="ie5menu" class="skin1" onBlur="Call CloseMenu">
<div class="menuitems" id="divOption1" url="" OnMouseOver="ChangeBack(1)"
OnMouseOut="ChangeBack(1)">Rotate Right</div>
<div class="menuitems" id="divOption2" url="" OnMouseOver="ChangeBack(2)"
OnMouseOut="ChangeBack(2)">Rotate Left</div>
<hr>
<div class="menuitems" id="divOption3" url="" OnMouseOver="ChangeBack(3)"
OnMouseOut="ChangeBack(3)">Remove Image</div>
<hr>
<div class="menuitems" id="divOption7" url="" OnMouseOver="ChangeBack(7)"
OnMouseOut="ChangeBack(7)" onClick="Call CloseMenu">Cancel Menu</div>
</div>