2002C Miscellaneous #12977

msflexgrid cell tips

★★★★★

4.8 · ดาวน์โหลด: 2,341

Simple code to display tooltips displaying the text, regardless of length, of an msflexgrid cell. Tooltips are displayed when the mousepointer passes over any cell.

สรุปโดย AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ซอร์สโค้ด

Private Sub Grid1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
Static txt As String
Dim tip As String
tip = Grid1.TextMatrix(Grid1.MouseRow, Grid1.MouseCol)
 If txt <> tip Then
  Grid1.ToolTipText = tip
  txt = tip
 End If
End Sub

ความคิดเห็นดั้งเดิม (3)

กู้คืนจาก Wayback Machine