https://foro.gambas-es.org/viewtopic.php?f=1&t=8118&p=48933#p48933
-----------------------------------
vuott
Miercoles, 24 Junio 2020, 20:01

Re: Ver Texto Al Posicionarse Con El Ratón Encima De Celda
-----------------------------------
Como exemplo [u]general[/u] y simple, yo propondria este codigo:  :| 

[code linenumbers=false syntax=gambas]Public Sub Form_Open()

  Dim c, r As Byte

  With GridView1
    .Columns.Count = 2
    .Rows.Count = 6
    .Tracking = True
  End With
  
' Escribimos cualquier texto en cada celda:
  For c = 0 To GridView1.Columns.Max
    For r = 0 To GridView1.Rows.Max
      GridView1[r, c].Text = CStr(c) & "," & CStr(r)
    Next
  Next
 
End


Public Sub GridView1_MouseMove()
  
  GridView1.Tooltip = Null
  
  If (GridView1.RowAt(Mouse.Y) > -1) And (GridView1.ColumnAt(Mouse.X) > -1) Then
    GridView1.Tooltip = "<Font Color=red>" & GridView1[GridView1.RowAt(Mouse.Y), GridView1.ColumnAt(Mouse.X)].Text
  Endif
  
End[/code]


