Скачать: CL | DM;

Количество записей в таблице...   Найти похожие ветки 

← →
Олег Валерьевич   (2007-04-19 13:11) [0]

Здравствуйте уважаемые! Вопрос прост..
Как вывести количество записей из таблице Porodox (.DB) в StatusBar? (работаю с BDE)

---

← →
Правильный Вася   (2007-04-19 13:13) [1]

Table.RecordCount

---

← →
Робинзон   (2007-04-20 09:45) [2]

Не знаю получится или нет я делал для таблицы Access следующим образом:
var
CountRows:integer;
begin
CountRows := form1.DbGrid1.DataSource.DataSet.RecordCount;

  form1.StatusBar.Panels[0].Text:="  Количество записей - "+inttostr(CountRows);
Если хочешь попробуй. Может, что и получится.

---

← →
MsGuns ©   (2007-04-20 14:06) [3]

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;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.093 c