注册 登录
编程论坛 VFP论坛

grid表添加combo赋值不显示?

wangliufu 发布于 2020-10-31 16:27, 1781 次点击
thisform.grid2.AddColumn(thisform.grid2.ColumnCount+1)
WITH thisform.grid2.Columns(thisform.grid2.ColumnCount)
    .AddObject('Combo1','ComboBox')
    .CurrentControl = 'Combo1'
    .Combo1.Visible = .t.
    .Sparse = .f.
    .Combo1.borderstyle = 0
    .Combo1.additem("男")
    .Combo1.additem("女")
 ENDWITH
4 回复
#2
sdta2020-10-31 17:14
表格控件设置数据源试试
#3
sdta2020-10-31 17:18
thisform.grid2.AddColumn(thisform.grid2.ColumnCount+1)
CREATE CURSOR tt (a1 i, a2 i, xb c(2))
APPEND BLANK
thisform.grid2.RecordSource = "tt"
thisform.grid2.RecordSourceType = 1
thisform.grid2.columns(thisform.grid2.ColumnCount).width = 40
WITH thisform.grid2.Columns(thisform.grid2.ColumnCount)
    .AddObject('Combo1','ComboBox')
    .Combo1.Visible = .t.
    .Sparse = .f.
    .CurrentControl = 'Combo1'
    .Combo1.borderstyle = 0
    .Combo1.additem("男")
    .Combo1.additem("女")
ENDWITH
#4
wangliufu2020-11-01 11:54
增加新列赋值不显示
#5
吹水佬2020-11-01 16:50
回复 楼主 wangliufu
这段代码是放在哪里执行的?
1