Example
The following example illustrates a databound sheet (bound to BIBLIO.MDB provided with Visual Basic) that assigns the field names from the database to the ColID for each column. The text tips display the ColID, as shown in the following figure.
Visual Basic
Private Sub Form_Load()
' Set number of columns
fpSpread1.MaxCols = 8
' Display fixed text tips
fpSpread1.TextTip = TextTipFixed
End Sub
Private Sub fpSpread1_DataColConfig(ByVal Col As Long, ByVal DataField As String, ByVal DataType As Integer)
' Set up column IDs to be field names from database
Dim x As Long
For x = 1 To 8
fpSpread1.Col = x
fpSpread1.ColID = fpSpread1.DataField
Next x
End Sub
Private Sub fpSpread1_TextTipFetch(ByVal Col As Long, ByVal Row As Long, MultiLine As Integer, TipWidth As Long, TipText As String, ShowTip As Boolean)
' Display column IDs as text tips
fpSpread1.Col = Col
TipText = fpSpread1.ColID
ShowTip = True
End Sub