| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1965 人关注过本帖
标题:在表格Grid上增加Combo1
只看楼主 加入收藏
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3146
专家分:8408
注 册:2015-3-25
结帖率:98.98%
收藏
已结贴  问题点数:20 回复次数:4 
在表格Grid上增加Combo1
怎样在Grid上动态增加Combo1,同时显示字段原来内容,也有选择"男","女"
tb(id,name,sex)
001,张三,男
002,李四,女
003,王五,男
thisform.grid1.ColumnCount = -1
thisform.grid1.RecordSourceType = 1
thisform.grid1.RecordSource = "tb"

 WITH thisform.grid1.Columns[3]
    .AddObject('Combo1','ComboBox')
    .CurrentControl = 'Combo1'
    .Combo1.Visible = .t.
    .Sparse = .f.
    .Combo1.borderstyle = 0
    .Combo1.additem("男")
    .Combo1.additem("女")
 ENDWITH
上面出来的,表格是
001,张三,男
002,李四,男
003,王五,男
不是我要的
001,张三,男
002,李四,女
003,王五,男
搜索更多相关主题的帖子: 表格 Grid 增加 name thisform 
2017-10-26 00:31
xinjie
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:19
帖 子:271
专家分:520
注 册:2007-8-11
收藏
得分:5 
图片附件: 游客没有浏览图片的权限,请 登录注册

执行后比较一下。
2017-10-26 01:30
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10527
专家分:42899
注 册:2014-5-20
收藏
得分:15 
        thisform.grid1.ColumnCount = -1
        thisform.grid1.RecordSourceType = 1
        thisform.grid1.RecordSource = "tb"
        WITH thisform.grid1.Columns[3]
            .RemoveObject("Text1")            
            .AddObject('Combo1','ComboBox')
            .ControlSource = "tb.sex"
            .Sparse = .f.
            .Width = 40
            .Combo1.borderstyle = 0
            .Combo1.Style = 2
            .Combo1.RowSourceType = 1
            .Combo1.RowSource = "男,女"
            .Combo1.Visible = .t.
        ENDWITH
2017-10-26 04:51
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3146
专家分:8408
注 册:2015-3-25
收藏
得分:0 
thisform.grid1.ColumnCount = -1
        thisform.grid1.RecordSourceType = 1
        thisform.grid1.RecordSource = "tb"
        WITH thisform.grid1.Columns[3]
            .RemoveObject("Text1")    &&同时还要删除他
            .AddObject('Combo1','ComboBox')
            .ControlSource = "tb.sex" &&不能这样.CurrentControl = 'Combo1'
            .Sparse = .f.
            .Width = 40
            .Combo1.borderstyle = 0
            .Combo1.Style = 2
            .Combo1.RowSourceType = 1
            .Combo1.RowSource = "男,女"
            .Combo1.Visible = .t.
        ENDWITH
2017-10-26 08:34
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3146
专家分:8408
注 册:2015-3-25
收藏
得分:0 
动态增加的ComboBox的InteractiveChange事件,除了绑定,或者自己封装类,还有什么办法在这里修改?
2017-10-26 08:37
快速回复:在表格Grid上增加Combo1
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017871 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved