clear close databases all create cursor test (f1 c(10), f2 i) insert into test values ('Hello',1) insert into test values ('World',2) go top set eventlist to afterrowcolchange,beforerowcolchange additive set eventtracking on set eventtracking to 'c:\events.log' public oform1 oform1=newobject("form1") oform1.show read events set eventtracking to set eventtracking off modify file c:\events.log define class form1 as form height = 171 width = 375 docreate = .t. autocenter = .t. caption = "Form1" name = "Form1" add object grid2 as grid with ; height = 108, ; left = 12, ; top = 12, ; width = 348, ; name = "Grid2" procedure destroy clear events endproc enddefine