Собственно идея такая:
- Запоминаем в переменной значение идентификатора - например поля ClientID (CurrencyManager)
- после сортировки запускаем цикл который проверяет в какой строке не датасета, а его представления в гриде (ведь записи кроме того что отсортированы могут быть еще и отфильтрованы) теперь находится это значение.
- выделяем эту запись.

Вот это и делает (должен) этот цикл.
На всякий случай Me.dataGrid1.Item(I, 0) - возвращает значение из строки I и первой колонки. Если идентификатор (ClientID) не в первой колонке - подставь другую цифру.

Господа, давайте юзать нормальные гриды (например DevExpress.XtraGrid), и не будет таких проблем

Papirus - а если идентификатор есть только в DataSet, а в DataGrid он не отображается за ненадобностью?
Может быть, можно в DataGrid организовать невидимый стобец?
mr.Duda - стандартные гриды по определению должны работать быстрее.

Хорошая мысль, имхо, скрыть столбец с идентификатором. Если используешь стиль грида, то добавь этот столбец с идентификатором и поставь его ширину = 0

Вот это точно работает

Код

Dim I As Integer For I = 0 To Me.dataset11.Table1.DefaultView.Count - 1       If Me.dataGrid1.Item(I, 0) = MyParam Then                 Me.BindingContext(Me.DataGrid1.DataSource, Me.DataGrid1.DataMember).Position = I                Me.dataGrid1.Select(0)                Exit For       End If Next

Добавлено @ 09:41

Цитата(mr @ 20.10.2005, 22:17)

Господа, давайте юзать нормальные гриды (например DevExpress.XtraGrid), и не будет таких проблем

Возможно. Но я лично не шибко люблю использовать в проге "левые" компоненты, если можно использовать стандартные. Другое дело, если сандартные слишком запарно причесывать под потребность юзеров.
Но это мое частное, личное и персональное ИМХО.

Papirus - спасибо за помощь. Спасибо за совет с нулевой шириной столбца - очень пригодилось.
И все-таки этот способ позволяет встать на ту строку DataGrid, на которой находился курсор до сортировки. А мне нужно вставать на ту строку, где после сортировки оказалась запись, на которой находлся курсор до сортировки.
Лучше чем этот код придумать пока не получается

Код

Private Sub DataGrid1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataGrid1.Click         Dim pnt As Point = DataGrid1.PointToClient(Cursor.Position)         Dim hti As DataGrid.HitTestInfo = DataGrid1.HitTest(pnt)         If hti.Type = DataGrid1.HitTestType.ColumnHeader Then             Dim MDataView As DataView = DS1.Tables("Table1").DefaultView             AddHandler CType(MDataView, IBindingList).ListChanged, AddressOf DListChanged         End If     End Sub     Sub DListChanged(ByVal sender As Object, ByVal e As ListChangedEventArgs)         Dim MDataView As DataView = DS1.Tables("Table1").DefaultView         Dim properties As PropertyDescriptorCollection = CType(MDataView, ITypedList).GetItemProperties(Nothing)         Dim oDescriptor As PropertyDescriptor = properties("T1")         Dim iPos As Integer = CType(MDataView, IBindingList).Find(oDescriptor, T1) 'Т1 - значение столбца, по которому идет определение позиции записи         BindingContext(DataGrid1.DataSource, DataGrid1.DataMember).Position = iPos         DataGrid1.Select(iPos)     End Sub

Если надежно работает, то чего еще нужно...

Просто не сразу удалось выйти на это решение.
И не совсем понятно, почему Ваш вариант не идет у меня...
Впрочем, ладно, проблема решена. У кого возникнет подобная же, тот сможет воспользоваться любым из вариантов (какой больше пойдет)

[quote=asper, 25.10.2005, 02:02]И не совсем понятно, почему Ваш вариант не идет у меня... [/quot]

Все просто - он у меня срабатывает в процедуре Click ДО сортировки , а надо после. так что мой вариант не работает как надо. Т.е. отлавливать событие ListChanged все таки надо.

Ну не досмотрел...