G
Guest
Hi
I want a border to appear around a shape when the cursor moves over it and i
want no border of the shape when cursor moves out of that area.
i.e.
Private Sub pcb_MouseMove(Button As Integer, Shift As Integer, X As Single,
Y As Single)
pcb.BorderStyle = 1
pcb.BorderWidth = 2
pcb.BorderColor = RGB(255, 0, 0)
End Sub
the above works fine when i move my mouse over the shape, BUT when i movemy
mouse out of it, i want the Border to become transparent i.e.
pcb.BorderStyle=0
How do i do the second part?
I want a border to appear around a shape when the cursor moves over it and i
want no border of the shape when cursor moves out of that area.
i.e.
Private Sub pcb_MouseMove(Button As Integer, Shift As Integer, X As Single,
Y As Single)
pcb.BorderStyle = 1
pcb.BorderWidth = 2
pcb.BorderColor = RGB(255, 0, 0)
End Sub
the above works fine when i move my mouse over the shape, BUT when i movemy
mouse out of it, i want the Border to become transparent i.e.
pcb.BorderStyle=0
How do i do the second part?