Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как обновить одну запись в DBGride / 4 сообщений из 4, страница 1 из 1
22.10.2003, 12:03
    #32301168
Петр
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как обновить одну запись в DBGride
Ситуация следующая: документ работает по принцыпу
1) через ADODataSet1 загружается список документов
Код: plaintext
1.
select code, name from table

code - уникальное поле первичного ключа

2) При нажатии на какой-то крнретный документ (code = 1) он раскрывается через ADODataSet2 загружается полный список необходимых полей + подчененные таблицы
Код: plaintext
1.
select * from table where code =  1

После заполнения полей в ADODataSet2 нужно обновить ADODataSet1. Но обновлять весь набор данных долго. refresh вообще делает селект по всем записям.
Код: plaintext
1.
2.
3.
4.
ADODataSet1.Properties['Unique Table'].Value    := 'table';
ADODS.Properties['Resync Command'].Value  := 'select * from table where code = ?';
ADODataSet1.Properties['Update Criteria'].Value := adCriteriaKey;
ADODataSet1..Properties['Update Resync'].Value   := adResyncAll;

Не производит ни каких действий. Как быть?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.10.2003, 12:05
    #32301177
Петр
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как обновить одну запись в DBGride
Сорри ошибся в синтаксисе
Код: plaintext
1.
2.
3.
4.
ADODataSet1.Properties['Unique Table'].Value    := 'table';
ADODataSet1.Properties['Resync Command'].Value  := 'select * from table where code = ?';
ADODataSet1.Properties['Update Criteria'].Value := adCriteriaKey;
ADODataSet1.Properties['Update Resync'].Value   := adResyncAll;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.10.2003, 12:20
    #32301220
ZrenBy
ZrenBy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как обновить одну запись в DBGride
Код: plaintext
1.
2.
3.
ADODS.UpdateCursorPos;
ADODS.Recordset.Resync(adAffectCurrent,adResyncAllValues);
ADODS.Resync([rmExact]);
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.10.2003, 13:43
    #32301396
Петр
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как обновить одну запись в DBGride
2 ZrenBy.
Странно как раз твои сообщения читал, послал по ICQ(правда онa отключина). Так вот, так и сделал
ADODS.Recordset.Resync(adAffectCurrent,adResyncAllValues);
вылитает в ошибку

если не трудно не мог бы объяснить в каком случае срабатывает ... = ? ->
У меня =? дает ошибку (Multiple-step OLE DB operation generated error. Check each OLE DB status value, if available. No work was done.), а с точным значением code все проходит?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как обновить одну запись в DBGride / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]