Procedure grdTable.MouseMove LParameter nButton, nShift, nXCoord, nYCoord Local cText cText = 'Tooltips text is here' This.ToolTipText = cText