Наилучшее событие для подсчета записей

[k1r1ch]

В моей программе в углу должно писаться кол-во записей в таблице. Я использую событие таблицы (которая DBGrid) OnDrawCell. Но наверное это не экономично... Есть ли событие у TADOTable или у TDBGrid, что-то типо OnChange?

[artemavd]

В моей программе в углу должно писаться кол-во записей в таблице.

Вообще количество всех записей (строк) во всей таблице? Или только количество записей по какому-то полю? Если первое, то запрос такой будет:

select count(*) from Table

Запрос выше покажет сколько всего в таблице записей. Поставьте вместо * имя поля и получите количество записей только по этому полю.

[k1r1ch]

Не-не, я знаю как это написать:

StatusBarInfo.Caption := 'Записей: ' + IntToStr(D.Table.RecordCount);

Вопрос - в каком обработчике события? Ведь OnDrawCell у DBGrid вызывается при каждой перерисовке таблицы, даже если база данных не изменялась...

[artemavd]

Можно повесить Timer с interval=1000. И пусть каждую секунду отображает количество записей. Хотя не уверен, что правильное решение. А вообще можете "повесить" Вашу строчку кода в любую процедуру любой кнопки по нажатию которой идет работа с БД .

[k1r1ch]

Я рассматривал такой вариант (с обработчиком каждой кнопки), просто думал есть решение лучше...

[pu4koff]

В ADO так же есть события связанные с набором данных, а не с соединением, как вышеописанные. Они инкапсулированы в компоненты имеющие набор данных - TADODataSet, TADOTable, TADOQuery и TADOStoredProc.

Эти события можно разбить на три группы.

1) События выборки данных
OnFetchProgress - многократно вызывается в процессе выборки набора данных.
OnFetchComplete - завершение выборки.

2) Уведомления об изменении положения текущей записи в наборе.
OnWillMove, OnMoveComplete - вызываются до и после изменения положения текущей записи. OnWillMove позволяет отменить действие.
OnEndOfRecordset - вызывается при достижении конца набора данных, позволяет добавить новую запись.

3) Уведомления об изменении набора данных
OnWillChangeField, OnFieldChangeComplete - до и после изменения текущей записи набора.
OnWillChangeRecord, OnRecordChangeComplete - вызываются до и после изменения, добавления, удаления строки набора и отмене этих действий.
OnWillChangeRecordset, OnRecordsetChangeComplete - вызываются до и после открытия, закрытия, повторного запроса и синхронизации набора данных.

Многие события допускают прерывание действия. Эта возможность бывает полезна при асинхронной работе с сервером. Например, для прерывания слишком длинного запроса.

(c) http://www.interface.ru/home.asp?artId=3671

[Yurk@]

k1r1ch, а не проще ли поставить, например, компоненты EhLib ? ... там в самом ДБГриде есть єта фун-я ... и считает она автоматом

[evg_m]

StatusBarInfo.Caption := 'Записей: ' + IntToStr(D.Table.RecordCount);
добавить это после всех операций изменяющих D.table

т.е D.table.open (requery) add и т.д.