Public oManipulador As Manipulador * - Instancia o objeto manipulador oManipulador = Createobject("Manipulador") oGrid = SBO.pageframe1.page1.cont1.grid1 wait window oGrid.column13.Text1.value timeout 0.80 &&Show me the correct value : NCREC-CL.CMP-3 * Bindevent(oGrid.column13.Text1,"DblClick", oManipulador, "OnDblClick") *added code *reset Eventbinding LOCAL ARRAY laEve_Source(1),laEve_Target(1) UNBINDEVENTS(oGrid.column13.Text1) UNBINDEVENTS(oManipulador) SET alternate TO Eve_Log.txt SET alternate on ??'----',DATETIME(),'----' ?'Bindevent ', Bindevent(oGrid.column13.Text1,"DblClick", oManipulador, "OnDblClick") public laSource(1,5), laTarget(1,5) ?'laEve_Source ', AEVENTS(laEve_Source,oGrid.column13.Text1) && Return=0 no event bound. For more, see help AEVENTS() oEventObject ?'laEve_Target ', AEVENTS(laEve_Target,oManipulador) && see line above *raise event ?'raiseevent' raiseevent(oGrid.column13.Text1,"DblClick") *call methods ?'Call method DblClick' oGrid.column13.Text1.DblClick *call delegate as code ?'Call method OnDblClick' oManipulador.OnDblClick ?'MEMORY' ?'' SET alternate off SET alternate to DISPLAY MEMORY LIKE laEve* TO FILE Eve_Log.txt ADDITIVE */added code Define Class Manipulador As Custom Procedure OnDblClick *added code ?'OnDblClick' LOCAL lnevents LOCAL ARRAY laeve(1,3) lnEvents = AEVENTS(laEve,0) && Return=0 not called as an event bound. For more, see help AEVENTS() 0 ?'event count= ',lnevents IF !EMPTY(lnevents) THEN *only 1 run possible ?laEve(1,1).name,' ',laEve(1,2),' ',laEve(1,3) endif * Messagebox("you have dblclick on the column 13") */added code Return Endproc EnddefineLutz