CLEAR CREATE CURSOR temp (f1 i, f2 c(20)) INSERT INTO temp VALUES (1, 'one') INSERT INTO temp VALUES (2, 'two') GO TOP IN temp PUBLIC oBrowse as Grid && "Public" just for the demo BROWSE NAME oBrowse NOWAIT oBrowse.Move(50, 20, 80, 20) PUBLIC oHandler oHandler = CREATEOBJECT('BrowseHandler') BINDEVENT(m.oBrowse,'AfterRowColChange', oHandler,'ValidHandler') RETURN DEFINE CLASS BrowseHandler as Custom PROCEDURE ValidHandler(nColIndex) ? temp.f1, temp.f2 ENDPROC PROCEDURE Destroy UNBINDEVENTS(This) ENDPROC ENDDEFINEhth