>but i think my problem now is the previous textbox hvn't been deleted , so i cannot perform the click event declare inside the class "textcl".
>is there any coding need to be add inside the init of the class or the grid to startup the class "textcl"?!

---

Wai,
This is tested to work :

* You're setting classlib to textcl's lib, don't you
* I think you do, otherwise you would get error
if !"MYCLASSLIB" $ SET("CLASSLIB")
   set classlib to myClassLib additive
endif

WITH THISFORM.DET_GRD
 .COLUMNCOUNT = 6
 .RECORDSOURCE = 'RESULT'
 .SetAll("FORECOLOR",rgb(0,0,0),"Column")
 .SetAll("ALIGNMENT",0,"Header")
 FOR I = 1 TO 6
   with .COLUMNS[I]
     .REMOVEOBJECT("TEXT1")
     .ADDOBJECT("TEXT1","TEXTCL") 
     .HEADER1.CAPTION = GRD_INFO[I,1] 
     .CONTROLSOURCE = GRD_INFO[I,2]
     .TEXT1.VISIBLE = .T.
    endwith
 ENDFOR
 .READONLY = .T.
 .DELETEMARK = .F.
ENDWITH

If click is still not working also suspect a transparent shape or container control masking clicks on grid.
Cetin