Hi Budianto,
Here's what I would do :
Define Class MyColumn As Column
Function MouseMove
LPARAMETERS nBouton, nMaj, nXCoord, nYCoord
...Put Your Code Here
EndFunc
EndDefine
Then, when creating the grid :
MyGrid.ColumnCount = 0 && I think this will remove default columns in grid
MyGrid.AddObject("MyColumnName","MyColumn")&& put user defined column in grid
... The rest of your code to bind your column to fields or anything...
Hope it helps...