Событие перехода на новую строку

[aimk0]

Добрый день!
Подскажите пожалуйста, как отследить переход на другую строку(верхнюю или нижнюю) в DBGrid.

[Serge_Bliznykov]

так. запоминаем, что по сути DBGrid - это всего лишь средство ВИЗУАЛИЗАЦИИ данных из набора данных (датасета)

а у того датасета, который отображает DBGrid есть событие AfterScroll

TDataSet.AfterScroll
Occurs after an application scrolls from one record to another.

вот на него и цепляйтесь...

[aimk0]

В общем написал следующее:

procedure Tdm.tb_gr1AfterScroll(DataSet: TDataSet);
begin
FormSpravochnik.dbgrid1.Options:=[dgTitles,dgIndicator,dgColumnResize,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit];
FormSpravochnik.dbgrid1.Tag:=0;
end;

Пишет ошибку: Неизвестный идентификатор dgTitles и т.д., хотя по событию OnKeyPress в DBGrid все работает

procedure TFormSpravochnik.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if (key=#13) and (dbgrid1.Tag=1) then dbgrid1.DataSource.DataSet.Post;
dbgrid1.Tag:=0;
dbgrid1.Options:=[dgTitles,dgIndicator,dgColumnResize,dgColLines,dgRowLines,dgTabs,dgConfirmDelete,dgCancelOnExit];

В чем может быть проблема?

[Прик]

TDBGridOption объявлен в DBGrids. Этот модуль и надо указать в uses.