主题：请问大神，窗口中新建的临时表如何支持move

窗口中用DataTableBuilder建立的临时表如何设置才能使用move移动行呢

 加一列 _Sortkey

Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("_Sortkey", Gettype(Double))
dtb.AddDef("产品", Gettype(String), 32)
dtb.AddDef("客户", Gettype(String), 32)
dtb.AddDef("数量", Gettype(Integer))
dtb.AddDef("金额", Gettype(Double))
dtb.Build()
MainTable= Tables("统计")

没啥反应呢

程序界面可以，窗口中好像不行，没反应

上移行用的代码

 

With e.form.controls("table1").table

    .Current.Move(.Position - 1)
End With

 我测试可以，你是怎么弄的，做个小例。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目114.table

 测试了很久，木有办法，动态绑定表的时候，窗口表就变成副本了，太坏了……然后，就不能移动行了，移动的效果在另一个表……可能是bug

只有用实体表这一条路了呗

AfterLoad事件的最后面，加上一行代码，就可以移动行了：

 

 

Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("_Sortkey", Gettype(Double))
dtb.AddDef("产品", Gettype(String), 32)
dtb.AddDef("客户", Gettype(String), 32)
dtb.AddDef("数量", Gettype(Integer))
dtb.AddDef("金额", Gettype(Double))
dtb.AddDef("测试", Gettype(Double),"[_SortKey]")

e.Form.Controls("Table1").Table.datasource = dtb.BuildDataSource
e.Form.Controls("Table1").Table.allowedit = True
e.Form.Controls("Table1").Table.Sort = ""

 还是狐爸老辣