| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]同步表时，编辑窗口自动跳到第一条记录，如何解决？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=67781) |
| -- 作者：liuxianjie1980 -- 发布时间：2015/5/2 12:40:00 -- [求助]同步表时，编辑窗口自动跳到第一条记录，如何解决？ 如题。 问题来源：为了实现即时更新功能，在绘制有listview的窗口中加入了一个按钮，该按钮的代码就是绘制listview，然后打开窗口的计时器，计时器代码如下： 1.datatables（“表名”）.load 2.模拟单击按钮的代码，此处省略。 双击该窗口中的一条记录，打开另外一个窗口，编辑纪录，当更新数据时，编辑窗口则自动跳到第一条记录。 如何解决？ [此贴子已经被作者于2015/5/2 13:03:09编辑过]
|
| -- 作者：liuxianjie1980 -- 发布时间：2015/5/2 19:29:00 -- 怎么没人回复呢？ |
| -- 作者：黄训良 -- 发布时间：2015/5/3 1:04:00 -- 更新后加上你所要的排序代码。 |
| -- 作者：大红袍 -- 发布时间：2015/5/3 21:07:00 -- CurrentTable.StopRedraw
CurrentTable.Current.Save
Dim identify As Integer = CurrentTable.Current("_Identify")
Dim tidx As Integer = CurrentTable.TopVisibleRow
CurrentTable.DataTable.Load
Dim idx As Integer = CurrentTable.FindRow("_Identify = " & identify)
If idx > -1 Then
CurrentTable.Position = idx
CurrentTable.TopVisibleRow = tidx
Else
CurrentTable.Position = CurrentTable.Rows.Count - 1
End If
CurrentTable.ResumeRedraw
|