为什么要双击才能显示背景色呢?
LPARAMETERS nColIndex
Select (This.Recordsource)
Thisform.Text14.Value=ALLTRIM(单位)
Thisform.Text2.Value=ALLTRIM(品名)
Thisform.combo4.displayValue=ALLTRIM(货品编号)
thisform.combo4.SetFocus
this.setall("dynamicbackcolor","iif(this.activerow=recno(),rgb(0,255,255),rgb(255,255,255))","column")
bn="this.column"+alltrim(str(ncolindex))+".text1"
&bn..fontbold=.T. &&黑体
&bn..forecolor=255 &&红色
&bn..fontsize=12 &&变字号为11
有些不是查询的本地表单击就可以了,查询的表就要双击?
[解决办法]
thisform.grid1.recordsourcetype=1
thisform.grid1.recordsource="chaxun"
********* thisform.grid1.RecordSource='chaxun'
with thisform.grid1
.recordsource='chaxun'
.columncount=7