VFP 愛用者社區

[tsmax]

再次紧急求教张老师及各位高手，拜托拜托

with thisform.grid1
.columncount=6
.recordsource='mxj'
.deletemark=.f.
.column7.addobject('check1','checkbox')
.column7.check1.caption=''
.column7.currentcontrol='check1'
.column7.sparse=.f.
.column7.check1.controlsource='mxj.bj'
.column1.header1.caption='日期'
.column2.header1.caption='凭证号'
.column3.header1.caption='摘要'
.column4.header1.caption='借方(增加)'
.column5.header1.caption='贷方(减少)'
.column6.header1.caption='选择'
.column1.width=70
.column2.width=42
.column3.width=210
.column4.width=84
.column5.width=84
.column7.width=28
.column1.controlsource='mxj.rq'
.column2.controlsource='mxj.pzh'
.column3.controlsource='mxj.zy'
.column4.controlsource='mxj.zj'
.column5.controlsource='mxj.js'
.column6.controlsource='mxj.bj'
.column4.format='Z'
.column5.format='Z'
.column6.format='Z'
.column1.readonly=.t.
.column2.readonly=.t.
.column3.readonly=.t.
.column4.readonly=.t.
.column5.readonly=.t.
.column6.readonly=.f.
endwith



以上是我的表单中对grid的定义，运行后用Tab键移动光标，光标至第5列后再按Tab则折返到第1列，光标不能移动到第6列上；用鼠标点击第6列使其变成当前活动单元，按空格、回车、单击都不能改变checkbox的值，好像是只读，然而显然不是这个原因，我实在搞不懂了？



用图形界面方式构建上述表单，则不会出现上述现象



请教，请教，再请教

[Le1015]

1.
with thisform.grid1
.readonly=.F.
EndWith

2.
資料表格是否唯讀

[tsmax]

求救！

[朱育興]

你的 Column7 是不是 Column6 的筆誤啊

你的 columncount 設定為 6，且 Column1 ~ Column6 都有，Column7 到底是何方怪物

[tsmax]

楼上仁兄明鉴，确系笔误
此问题已解决，应加入 .column6.check1.visible=.t.