>>thisform.imgMap.MousePointer = 2 >>>>
this.Left = 0 this.Width = this.Parent.Width this.Height = 0In the Init of Line2 (Vertical):
this.Top = 0 this.Height = this.Parent.Height this.Width = 0In the Container.MouseMove:
LPARAMETERS nButton, nShift, nXCoord, nYCoord this.Line1.Top = nYCoord - this.Top this.Line2.Left = nXCoord - this.Left[Update]
LPARAMETERS nButton, nShift, nXCoord, nYCoord this.Top = nYCoord - this.Parent.Top this.Parent.Line2.Left = nXCoord - this.Parent.LeftLine2.MouseMove:
LPARAMETERS nButton, nShift, nXCoord, nYCoord this.Left = nXCoord - this.Parent.Left this.Parent.Line1.Top = nYCoord - this.Parent.TopAnd to handle when the mouse moves outside the container (Container.MouseLeave):
LPARAMETERS nButton, nShift, nXCoord, nYCoord this.Line1.Top = nYCoord - this.Top this.Line2.Left = nXCoord - this.LeftThat should do it.
this.MousePointer = 13 this.SetAll("MousePointer",13)or
this.MousePointer = 2 this.SetAll("MousePointer",2)