MouseOver Event?

Post

Posted
Rating:
#1 (In Topic #625)
01McAc
Regular
01McAc is in the usergroup ‘Regular’
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?
Image

(Click to enlarge)

Online now: No Back to the top

Post

Posted
Rating:
#2
cogier
Avatar
Guru
cogier is in the usergroup ‘Guru’
Run this code in a "Graphical application". I think this is what you are looking for.

Code (gambas)

  1. TextLabel1 As TextLabel
  2. HBox1 As HBox
  3. Label1 As Label
  4.  
  5. Public Sub Form_Open()
  6.  
  7.   With Me
  8.     .h = 200
  9.     .w = 700
  10.     .Padding = 5
  11.     .Arrangement = Arrange.Vertical
  13.  
  14.   With TextLabel1 = New TextLabel(Me) As "TextLabel1"
  15.     .Expand = True
  16.     .Alignment = Align.Center
  18.  
  19.   With HBox1 = New HBox(Me)
  20.     .H = 28
  22.  
  23.   With Label1 = New Label(HBox1) As "Label1"
  24.     .H = 28
  25.     .Expand = True
  26.     .Alignment = Align.Center
  27.     .background = Color.Yellow
  28.     .Font.Bold = True
  29.     .Text = "Hover over me!"
  31.  
  33.  
  34. Public Sub Label1_Enter()
  35.  
  36.   TextLabel1.Font = Font["55,bold"]
  37.   TextLabel1.Text = "Hello 01McAc!"
  38.  
  40.  
  41. Public Sub Label1_Leave()
  42.  
  43.   TextLabel1.Text = ""
  44.  
Online now: No Back to the top

Post

Posted
Rating:
#3
01McAc
Regular
01McAc is in the usergroup ‘Regular’

cogier said

I think this is what you are looking for.

Indeed, this is it.
And it's the Enter-event! I am still blinded by Access.
Thank you.
Online now: No Back to the top
1 guest and 0 members have just viewed this.