If the cursor is on row 1 and col 9 the baloon appear...
But if i move the cursor on row 1 col 10 the new value dont change!!!!
note:
i need only if is present a picture in cell
Private Sub MSFlexGrid1_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
With MSFlexGrid1
.Row = .MouseRow
.Col = .MouseCol
If .CellPicture <> 0 Then
If Not m_bInLable Then
m_bInLable = True
TT.Title = "TEST"
TT.TipText = "RIGA: " & .MouseRow & " COLONNA: " & .MouseCol
TT.Create Me.MSFlexGrid1.hwnd
End If
Else
m_bInLable = False
TT.Title = ""
TT.TipText = ""
TT.Destroy
End If
End With
End Sub
But if i move the cursor on row 1 col 10 the new value dont change!!!!
note:
i need only if is present a picture in cell
Private Sub MSFlexGrid1_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
With MSFlexGrid1
.Row = .MouseRow
.Col = .MouseCol
If .CellPicture <> 0 Then
If Not m_bInLable Then
m_bInLable = True
TT.Title = "TEST"
TT.TipText = "RIGA: " & .MouseRow & " COLONNA: " & .MouseCol
TT.Create Me.MSFlexGrid1.hwnd
End If
Else
m_bInLable = False
TT.Title = ""
TT.TipText = ""
TT.Destroy
End If
End With
End Sub