| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Количество записей в таблице... [D7, Paradox]
Олег Валерьевич © (2007-04-19 13:11:00)Здравствуйте уважаемые! Вопрос прост..
Как вывести количество записей из таблице Porodox (.DB) в StatusBar? (работаю с BDE)
MsGuns (2007-04-20 14:06:00) [1]procedure TForm1.Query1AfterScrool(Sender: TObject; DataSet: TDataSet);
begin
with DataSet do
begin
if Tag>0 then exit; // блокировка при сканировании
if RecordCount>0 then
StatusBar1.Panels[0].Text := 'Запись '+IntToStr(RecNo)'+' из '+
IntToStr(RecordCount)
else
StatusBar1.Panels[0].Text := 'Нет записей';
end;
end;
Робинзон (2007-04-20 09:45:00) [2]Не знаю получится или нет я делал для таблицы Access следующим образом:
var
CountRows:integer;
begin
CountRows := form1.DbGrid1.DataSource.DataSet.RecordCount;
form1.StatusBar.Panels[0].Text:=' Количество записей - '+inttostr(CountRows);
Если хочешь попробуй. Может, что и получится.
Правильный Вася (2007-04-19 13:13:00) [3]Table.RecordCount
| |
