from form.init() bindevent(this.grdMain.column1.text1,'dblclick',ohandler,'click') bindevent(this.grdMain.column2.text1,'dblclick',ohandler,'click') bindevent(this.grdMain.column3.text1,'lostfocus',ohandler,'click') bindevent(this.grdMain.column4.text1,'lostfocus',ohandler,'click') public gnRow,gnCol,goCol store -1 to gnRow,gnCol public ohandler ohandler=newobject("myhandler") do form junkbind define class myhandler as custom procedure click aevents(laEvent,0) loCalledBy = laEvent[1] ?loCalledBy.value,; loCalledBy.name,; loCalledby.parent.name,; loCalledby.parent.parent.name loCol = loCalledby.parent ?'controlsource',loCol.controlsource loGrid = loCalledby.parent.parent ?'col',loGrid.activecolumn ?'row',loGrid.activerow loActiveControl = _SCREEN.ACTIVEFORM.ACTIVECONTROL ?loActiveControl.baseclass ?loActiveControl.value ?loActiveControl.activecolumn ?loActiveControl.activerow return .t. enddefine