Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.11;
Скачать: CL | DM;

Вниз

Определение количества записей в физической таблице, несмотря на фильтрацию   Найти похожие ветки 

 
BigError   (2002-03-22 13:23) [0]

Подскажите, пожалуйста, разрешение глупой проблемки - как определить количество записей в TTable.
Само по это просто - свойство TTable.RecordCount. Но дело в том, что часть записей отфильтрована по
некоторым условиям в событии OnFilterRecord, после чего RecordCount становится равным количеству
отфильтрованных записей, а не реально имеющихся.
Причем нужно определять количество записей постоянно, при каждом Insert, Append, Delete и так далее.
Есть ли какой пропертис или функция, которые дают _всегда_ количество реальных записей в ТТable,
несмотря на фильтрацию? Или как эту проблему решить, если ничего такого нет? Спасибо.


 
Val ©   (2002-03-22 14:04) [1]

ставите query, прописываете в SQL.Text select count * from mytable до операций с таблицей, присваиваете результат запроса переменной, затем, при операциях добавления, удаления соответственно прибавляете или отнимаете единицу, в соответствующих обработчиках.


 
-=CrazyFish=- ©   (2002-03-22 14:04) [2]

var
b: TBookmarkStr;

begin
...
with Table1 do
begin
DisableControls;
b:=Bookmark;
filtered:=false;
form1.caption:="Число записей: "+IntToStr(Table1.RecordCount);
filtered:=true;
bookmark:=b;
enableControls;
end;
...
end;


 
BigError   (2002-03-22 14:26) [3]

>2CrazyFish
Большое спасибо, все работает!



Страницы: 1 вся ветка

Текущий архив: 2002.04.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
3-32680
grabovsky
2002-03-20 16:36
2002.04.11
увеличение справочника БД


14-32941
Delirium
2002-03-02 14:35
2002.04.11
Юрий Зотов , отсзвитесь !


3-32685
Seri
2002-03-21 09:06
2002.04.11
SQL Insert и Boolean


1-32888
BAHO
2002-03-28 19:45
2002.04.11
Помогите с ListView...


1-32811
Adoon
2002-04-01 11:33
2002.04.11
1С и Delphi6