Одновременная прокрутка таблиц

[User_IR_An]

Здравствуйте, подскажите пожалуйста как можно реализовать одновременную прокрутку нескольких DBGridEh???

[evg_m]

как всегда "ловить" сообщение(событие) о перемещении в одном наборе данных и прокручивать другой набор данных до нужной позиции.
OnAfterScroll для одного TDataSet (который крутим) и Locate на другом TDataSet(который должен крутиться "синхронно").

[User_IR_An]

Сообщение от evg_m

как всегда "ловить" сообщение(событие) о перемещении в одном наборе данных и прокручивать другой набор данных до нужной позиции.
OnAfterScroll для одного TDataSet (который крутим) и Locate на другом TDataSet(который должен крутиться "синхронно").

Извините, а можно по подробнее, объяснить как отлавливать событие.

[evg_m]

"ловить сообщение" ==написать процедуру(метод) и назначить ее как обработчик для соответствующего события (event).

1. В Delphi выбираем форму на которой все это расположено (наши таблицы(Grid) и наборы данных(DataSet) "привязанные" к ним.

2. находим DataSet для которого хотим "ловить событие"
3. нажимаем F11 (для перехода в ObjectInspector [Инспектор Объектов]).

4.Далее работаем с окном ObjectInspector.
4.1. в выпадающем списке объектов(combobox) проверяем что у нас выбран правильный объект(Dataset). Если нет, то устанавливаем.

4.2. выбираем вкладку Events (события)
4.3. находим интересующее нас событие. (AfterScroll)
4.4. DblClick на пустом поле напротив нужного события.

5. теперь мы готовы "ловить событие" получать сообщение(Event).
осталось только написать что будем делать в случае прихода (наступления) данного сообщения.
писать надо внутри той процедуры(метода) который мы получили по DblClick из п.4.4.

А писать мы будем что?
Правильно мы будем искать(Locate) нужную нам запись в другом DataSet.

[User_IR_An]

Сообщение от evg_m

"ловить сообщение" ==написать процедуру(метод) и назначить ее как обработчик для соответствующего события (event).

1. В Delphi выбираем форму на которой все это расположено (наши таблицы(Grid) и наборы данных(DataSet) "привязанные" к ним.

2. находим DataSet для которого хотим "ловить событие"
3. нажимаем F11 (для перехода в ObjectInspector [Инспектор Объектов]).

4.Далее работаем с окном ObjectInspector.
4.1. в выпадающем списке объектов(combobox) проверяем что у нас выбран правильный объект(Dataset). Если нет, то устанавливаем.

4.2. выбираем вкладку Events (события)
4.3. находим интересующее нас событие. (AfterScroll)
4.4. DblClick на пустом поле напротив нужного события.

5. теперь мы готовы "ловить событие" получать сообщение(Event).
осталось только написать что будем делать в случае прихода (наступления) данного сообщения.
писать надо внутри той процедуры(метода) который мы получили по DblClick из п.4.4.

А писать мы будем что?
Правильно мы будем искать(Locate) нужную нам запись в другом DataSet.

Я наверно не правильно сформулировала вопрос, я все понимаю как создать процедуру.
Вот для adoquery (который поключен к dbgrid, который нужно прокручивать) на событие AfterScroll пишу( как поняла из ваших слов) :

AQ_Var_cikl_p.DataSource.DataSet.Lo cate(???)

И вот не понимаю что написать в Locate

[Serge_Bliznykov]

в Locate нужно написать условие, по которому происходит позиционирование в связанном гриде. У Вас же гриды как-то связаны?!

в худшем случае, когда основной грид и зависимый никак не связаны, тогда делайте перемещение по номеру записи... (какой номер записи текущий в главном гриде, такой же номер записи делайте активным и в связанном гриде...)