+- Mirage Engine (https://mirage-engine.uk/forums)
+-- Forum: Mirage Source (Nostalgia) (https://mirage-engine.uk/forums/forumdisplay.php?fid=61)
+--- Forum: Archive (2006-2011) (https://mirage-engine.uk/forums/forumdisplay.php?fid=18)
+---- Forum: Resources (https://mirage-engine.uk/forums/forumdisplay.php?fid=49)
+---- Thread: Remove arrow from combo box unless mouseover-ed (/showthread.php?tid=220)
- Dragoons Master - 04-08-2006
Since ComboBoxes does not have MouseMove property, use a TextBox Over the ComboBox. Name the ComboBox as "cmbCombo" and the TextBox as "txtBox" and w/ this code it should work:
Code:
Private Sub cmbCombo_Click()
txtBox.Text = cmbCombo.List(cmbCombo.ListIndex)
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
txtBox.Visible = True
End Sub
Private Sub txtBox_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
txtBox.Visible = False
End SubWhen the mouse is over the TextBox, this will get invisible and you will see the ComboBox, and when the mouse is over the form or any other object(easy to implement) it will become visible again but the text will change with the combo box.
- Robin - 04-08-2006
lol. would never have thought of that Dragoons Master.
But don't the textbox and combobox have different border styles? (Depending on which style you use on the combobox)
If so, i would take a screenshot of the combobox, add the picture into a picture box then add a label inside the picturebox and change the caption of the label, and make the picbox visible or not visible.
Long way around it, but it it's going to be users looking at it, visual perfection is the key
- Dragoons Master - 06-08-2006
Well, it works but its visual efects bcouse you didnt realy edit the object, but it does look perfect ^^