

























最近在学习ProductsDemo.Win,有一些体会记录下来,大家分享:
在Contacts模块:
在Private Sub UpdateCurrentContact()过程添加一句:InitIndex(DataHelper.Contacts)'根据Contacts数据库重建索引
在Public Sub SetupGrid(ByVal list As List(Of AlphaIndex), ByVal grid As GridControl)过程添加代码后如下:
Dim view As GridView = TryCast(grid.MainView, GridView)
view.Columns.Clear()'清理索引列
view.Columns.AddVisible("Index")
grid.DataSource = list
AddHandler view.FocusedRowChanged, AddressOf view_FocusedRowChanged
实现更改Contacts的Last Name后重建索引。
此内容由惯性聚合(RSS阅读器)自动聚合整理,仅供阅读参考。 原文来自 — 版权归原作者所有。