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

Обновление StatusBar   Найти похожие ветки 

← →
student000   (2006-05-18 01:11) [0]

Господа, существует такая проблема:
Скажем, добавляю я запись в БД, сохраняю (при помощи ДБНавигатора), ТЫКАЮ кнопку «Все записи» - запись добавлена – проблем нет!

НО!

В StatusBar по-прежнему отображаются старые данные об общем количестве записей в БД.
Процедура отображения общего количества записей в БД:
procedure TForm1.FormCreate(Sender: TObject);
begin
StatusBar.Panels[2].Text:=Всего записей в БД: "+ IntToStr(ADOQuery1.RecordCount);
End.Господа, подскажите, пожалуйста, а можно сделать так, чтобы при добавлении новой записи информация в СтатусБаре тут же обновлялась, ну или скажем по щелчку на кнопку!

Заранее благодарю за ответ!

---

← →
ORMADA ©   (2006-05-18 06:31) [1]

а на свойство OnPost датасета слабо ту же самую
StatusBar.Panels[2].Text:=Всего записей в БД: "+ IntToStr(ADOQuery1.RecordCount);

обработку засунуть ?

---

← →
student000   (2006-05-18 10:59) [2]

Я не пользуюсь Дата сетом, а делаю вот как:
procedure TForm3.ADOQuery2AfterPost(DataSet: TDataSet);
begin
StatusBar.Panels[2].Text:="Всего записей в БД: "+ IntToStr(ADOQuery2.RecordCount);
end;

Но оно всё равно не работает...

---

← →
Плохиш ©   (2006-05-18 11:04) [3]

> ТЫКАЮ кнопку «Все записи»

Вот в обработчике кнопки, которую тыкаешь, и надо писать свой код.

---

← →
Johnmen ©   (2006-05-18 11:06) [4]

Естественно.... Добавляли в ADOQuery1, а считаем в ADOQuery2 :)))

---

← →
student000   (2006-05-18 14:35) [5]

Где я только не прописывал этот код:
StatusBar.Panels[2].Text:="Всего записей в БД: "+ IntToStr(ADOQuery2.RecordCount);

Где прописывал:
procedure TForm3.BitBtn1Click(Sender: TObject);

procedure TForm3.ADOQuery2AfterOpen(DataSet: TDataSet);

procedure TForm3.ADOQuery2AfterInsert(DataSet: TDataSet);

procedure TForm3.DataSource2DataChange(Sender: TObject; Field: TField);

procedure TForm3.ADOQuery2AfterPost(DataSet: TDataSet);

И почти везде обновление информации о количестве записей идёт только после перезапуска программы, а остальнх вообще неичего не показывает...

---

← →
Desdechado ©   (2006-05-18 15:38) [6]

без внимательности не быть тебе программистом
еще раз

почему в первый раз ты используешь ADOQuery1.RecordCount
а в другие разы "Где я только не прописывал" ADOQuery2.RecordCount

---

← →
MORA   (2006-05-18 15:41) [7]

может, надо сделать close/open?

---

← →
Antoha111 ©   (2006-05-18 17:58) [8]

Если работа с БД идет через SQL-запросы, то после добавления нужно переоткрыть ADOQuery.

---

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

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



Память: 0.46 MB
Время: 0.025 c