表格控件滚动条绑定的问题
求教各位老师,我表单上的一个表格控件,显示多列内容,每次点击表单上的命令按钮会增加一些数据,数据增加,列数也增加,如何绑定左右的滚动条自动到右边,显示后面的数据?
CREATE CURSOR tt (f1 I DEFAULT 1) APPEND BLANK FOR i=2 TO 20 ALTER TABLE tt ADD COLUMN ("f"+TRANSFORM(i)) I ENDFOR of = CREATEOBJECT("form1") of.show(1) RETURN DEFINE CLASS form1 as Form ADD OBJECT cmd1 as commandbutton WITH left=10,top=10,height=22 ADD OBJECT grid1 as grid WITH left=10,top=40 PROCEDURE cmd1.click thisform.grid1.setfocus thisform.grid1.ActivateCell(1,FCOUNT("tt")) ENDPROC ENDDEFINE