Ну и какой-то n00b вопрос от меня. Я порылся в сети и подобные вопросы здесь, но не нашел правильных ответов для такой простой (как я думал) проблемы.
У меня есть DBGrid. Я выбираю одну строку и делаю какие-то действия с другими данными, связанными с этой строкой. После того, как я закончил, моя DBGrid обновляется, и выбранная строка сбрасывается на первую. Я хочу, чтобы была выбрана та же строка, которая была выбрана до обновления данных DBGrid. Какие-либо предложения?
Перед обновлением сохраните текущую выборку связанного набора данных в качестве закладки, а затем восстановите закладку.
Этот ответ задуман как незначительное дополнение к ответу Мейсона, а не как альтернатива. Я добавил его только потому, что появился другой ответ, ошибочно предлагающий использование свойства RecNo набора данных. Не все потомки TDataSet надежно или вообще реализуют RecNo. Некоторые потомки просто возвращают постоянное значение, например. 0 для RecNo текущей строки и ничего не делать, когда вы присваиваете ему значение.
procedure TMyForm.DoSomethingWithDataSet(ADataSet : TDataSet);
var
Bookmark : TBookmark;
begin
Bookmark := ADataSet.GetBookmark; // Save your place in ADataSet
try
Screen.Cursor := crSqlWait; // Show the user that something is happening
Update; // update the form to make sure screen cursor updates
ADataSet.DisableControls;
// do something with ADataSet here e.g.
ADataSet.First;
while not ADataSet.Eof do begin
// do something with current row here, then
ADataSet.Next;
end;
finally
ADataSet.GotoBookmark(Bookmark); // Return to where you were at outset
ADataSet.FreeBookmark(Bookmark);
ADataSet.EnableControls;
Screen.Cursor := crDefault; // Let the user see you're done
end;
end;
