For my ongoing little project "A Personal Lens Register" I am desperately looking for a MouseOver sort-of-event. But first things first.
The form where the lens rating is shown (attached) has 10 criteria to rate a lens. My use case is just that simple: whenever I hovering the mouse over one of the 10 panels (e.g. Landscape, Lens Focal Throw, Vignetting, etc) a help text should appear on the right hand side. Any ideas how to show up a help text without clicking to any objects?
MouseOver Event?
- cogier
- Site Admin
- Posts: 674
- Joined: Wednesday 21st September 2016 2:22pm
- Location: Guernsey, Channel Islands
Re: MouseOver Event?
Run this code in a "Graphical application". I think this is what you are looking for.
TextLabel1 As TextLabel HBox1 As HBox Label1 As Label Public Sub Form_Open() With Me .h = 200 .w = 700 .Padding = 5 .Arrangement = Arrange.Vertical End With With TextLabel1 = New TextLabel(Me) As "TextLabel1" .Expand = True .Alignment = Align.Center End With With HBox1 = New HBox(Me) .H = 28 End With With Label1 = New Label(HBox1) As "Label1" .H = 28 .Expand = True .Alignment = Align.Center .background = Color.Yellow .Font.Bold = True .Text = "Hover over me!" End With End Public Sub Label1_Enter() TextLabel1.Font = Font["55,bold"] TextLabel1.Text = "Hello 01McAc!" End Public Sub Label1_Leave() TextLabel1.Text = "" End