以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  系统内置记录窗口 如何设置数据列内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=161119)
--  作者：yifan3429
--  发布时间：2021/3/6 18:35:00
--  系统内置记录窗口 如何设置数据列内容
Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")
rgd.Table = Tables("员工")
rgd.Columns = "编号|姓名|部门|职务|性别|尊称|出生日期|地址|家庭电话|办公电话"
rgd.Build()

这是需要绑定的记录窗口空间，直接使用内置的记录窗口如何达到上面的效果呢
 
With Tables(e.form.tablename)
            \'.Cols("Code").OpenWindow(300) \'打开列窗口
            .OpenRecordGrid(300)        \'打开记录窗口
            \'.Columns = "国籍|毕业院校|工作室名称|城市|职位|性别|手机号|个人爱好"
            .Cols("上行服务费").ShowInRecordGrid = False \'照片列不在记录窗口显示
            .Cols("下行服务费").ShowInRecordGrid = False \'照片列不在记录窗口显示
            .Cols("个人爱好").RecordRowHeight = 3 \'备注列的高度为3倍行高
        End With
--  作者：有点蓝
--  发布时间：2021/3/7 20:18:00
--  
内置的记录窗口只能使用ShowInRecordGrid 逐个设置