grid表添加combo赋值不显示？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → grid表添加combo赋值不显示？

标题：grid表添加combo赋值不显示？

只看楼主

wangliufu

等　级：新手上路
帖　子：3
专家分：0
注　册：2020-10-20
结帖率：50%

楼主

已结贴√ 问题点数：20 回复次数：4

grid表添加combo赋值不显示？

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

搜索更多相关主题的帖子: 不显示　赋值　 combo　grid　thisform　

2020-10-31 16:27

sdta

来　自：江苏省连云港市
等　级：版主
威　望：323
帖　子：9621
专家分：26174
注　册：2012-2-5

第 2 楼

得分:10

表格控件设置数据源试试

坚守VFP最后的阵地

2020-10-31 17:14

sdta

来　自：江苏省连云港市
等　级：版主
威　望：323
帖　子：9621
专家分：26174
注　册：2012-2-5

第 3 楼

得分:0

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

坚守VFP最后的阵地

2020-10-31 17:18

wangliufu

等　级：新手上路
帖　子：3
专家分：0
注　册：2020-10-20

第 4 楼

得分:0

增加新列赋值不显示

2020-11-01 11:54

吹水佬