| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

ADO "Чудеса в решете" [D7, Access, ADO]

Митяй ©   (2004-06-21 17:05:00) 

Странный глюк ADO.
В обработчике кнопки:Button1.OnClik
ADOTable1.Post;
ADOTable1.Refresh;
ADOTable1.Sort := 'date_opr';
ADOQuery1.Close;
ADOQuery1.Open;
... не работает обновление ADOQuery1.

Записываю... ADOQuery1.Close;
             ADOQuery1.Open;
         ... в другую отдельную кнопку, всё работает!!!
Ничего не понимаю.

---

Митяй   (2004-06-21 17:56:00) [1]

Да чего тут утаивать, прилагаю весь код, правда он без комментариев и компоненты не переименованы, в порядке познания ADO писал, поэтому не обессудьте...


procedure TForm1.FormCreate(Sender: TObject);
begin
 ADOTable1.Open;
 ADOTable1.Sort := 'Date_oper';
 ADOTable1.Insert;
 ADOQuery1.Open;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ADOTable1.Close;
end;

procedure TForm1.RzBitBtn1Click(Sender: TObject);
begin
ADOTable1.Insert;
end;

procedure TForm1.RzBitBtn3Click(Sender: TObject);
begin
ADOTable1.Post;
ADOTable1.Refresh;
ADOTable1.Sort := 'Date_oper';
ADOTable1.Last;
end;

procedure TForm1.RzBitBtn2Click(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.Open;
end;

end.

---

Johnmen   (2004-06-21 17:49:00) [2]

>Митяй ©   (21.06.04 17:29) [4]

Либо ты всё же что-то утаиваешь, либо такого не может быть...
:)

---

Митяй   (2004-06-21 17:38:00) [3]

> bushmen ©   (21.06.04 17:32) [5]
> >И ADOTable, и ADOQuery привязаны к одной таблице
>
> А Grid к чему привязан? :) И какую роль здесь играет StatusBar
> ?
</I
Ну пусть будет, не StatusBar, а например Label-и.
Grid привязан к таблу.

---

bushmen   (2004-06-21 17:38:00) [4]

>Курдль ©   (21.06.04 17:36) [6]
>StatusBar играет роль SummaryFooter-а!

Я про это: "Внизу StatusBar, в него заношу данные из запроса"

---

Курдль   (2004-06-21 17:36:00) [5]

> bushmen ©   (21.06.04 17:32) [5]
> А Grid к чему привязан? :) И какую роль здесь играет StatusBar
> ?


StatusBar играет роль SummaryFooter-а!
А вот ADOTable - это уже грустный компонент :(

---

bushmen   (2004-06-21 17:32:00) [6]

>И ADOTable, и ADOQuery привязаны к одной таблице

А Grid к чему привязан? :) И какую роль здесь играет StatusBar ?

---

Митяй   (2004-06-21 17:29:00) [7]

Код писать весь мне кажется нет смысла.
Попытаюсь по русски...
На форме "Грид", в режиме просмотра, рядом набор полей для ввода данных. Внизу StatusBar, в него заношу данные из запроса, каждый раз при занесении данных запрос обновляется и показывает остатки всего "БАРОХЛА", что есть в таблице.
И ADOTable, и ADOQuery привязаны к одной таблице.
Имеется кнопка Button_Insert и Button_Post.
Так вот в Button_Post пишу вот это:
ADOTable1.Post;
ADOTable1.Refresh;
ADOTable1.Sort := 'date_opr';
ADOQuery1.Close;
ADOQuery1.Open;
И не обновляется запрос.?
Прилепил ещё кнопочку записал туда:
ADOQuery1.Close;
ADOQuery1.Open;
Работает!

---

Johnmen   (2004-06-21 17:17:00) [8]

Либо первое, либо третье.
PS 3.Не приведены все исх.данные.

---

Митяй   (2004-06-21 17:10:00) [9]

> Johnmen ©   (21.06.04 17:07) [1]
> А мы ещё меньше...

Я не ясно изъяснился, :)... или проблема в ADO?

---

Johnmen   (2004-06-21 17:07:00) [10]

А мы ещё меньше...

---

Наверх