Refresh TClientDataSet по Master-Detail связке

← →
Ega23 © (2006-01-31 17:56) [0]

Вкратце, ситуация такова.
Есть Мастер-запрос (TADOQuery->TDataSource). На него смотрит грид.
Есть Деталь-запрос. Причём нужно, чтобы в конечном итоге данные из Detail-запроса оказались в TCleintDataSet.
Делаю стандартную связку TADOQuery->TDataSetProvider->TClientDataSet->TDataSource.
Для деталь-запроса поле в поле DataSource прописываю TDataSouce из мастер-запроса. Всё пучком.
НО. При обновлении данных в деталь-запросе данные в TClientDataSet НЕ ОБНОВЛЯЮТСЯ (да и не должны за просто так).
Вопрос: как мне лучше обновить TClientDataSet?

← →
Johnmen © (2006-01-31 18:00) [1]

Refresh ?

← →
Ega23 © (2006-01-31 18:09) [2]

> Refresh ?

В том-то и дело, что нифига... :-(
Я уже и Master-Detail заменил на вызов обработчика в MasterDataSource.OnDataChange:
procedure TGUIAccRolePropsFrame.dsAccRolesDataChange(Sender: TObject; Field: TField); var RoleID:Integer; ss:String; begin RoleID:=aqAccRoles.FieldByName("ObjID").AsInteger; ss:="exec S_TAccessRole @ActNam=""ACCMETPL.SEL"","+ " @RoleID="+ValX(RoleID); aqAllObjects.Close; aqAllObjects.SQL.Add(ss); aqAllObjects.Open; if not cdsAllObjects.Active then cdsAllObjects.Open else cdsAllObjects.Refresh; end; aqAccRoles:TADOQuery (Мастер-запрос) aqAllObjects:TADOQuery (Detail-запрос) cdsAllObjects:TClientDataSet

← →
sniknik © (2006-01-31 18:14) [3]

> как мне лучше обновить TClientDataSet?
может лучше им вообще не пользоваться? при такой то связке в одном приложении.

← →
Johnmen © (2006-01-31 18:18) [4]

>В том-то и дело, что нифига... :-(

Т.е. TClientDataSet.Refresh нифига?

← →
Ega23 © (2006-01-31 18:18) [5]

> Т.е. TClientDataSet.Refresh нифига?

Угу...

← →
Johnmen © (2006-01-31 18:20) [6]

Интересная загогулина...:)

← →
Johnmen © (2006-01-31 18:21) [7]

Close-Open?

← →
Ega23 © (2006-01-31 18:21) [8]

> может лучше им вообще не пользоваться? при такой то связке
> в одном приложении.

Дело в том, что он мне возвращает достаточно большую "деревянную" выборку, где надо данные подготовить на клиенте, и потом одной пачкой отправить на сервер. Пользование чем-либо, типа TTable не катит, т.к. захватит таблицу в экслюзив. А свою структуру "наворачивать" - средства отображения НД не увидят изменений.

← →
Ega23 © (2006-01-31 18:23) [9]

> Close-Open?

Да пробовал. И с разными выкрутасами, типа EmptyDataSet, и без них.
Не обновляется, скотина...

← →
Johnmen © (2006-01-31 18:25) [10]

>Не обновляется, скотина...

Это о-о-очень странно... М.б. повнимательней код поковырять?

← →
Ega23 © (2006-01-31 18:30) [11]

> Это о-о-очень странно... М.б. повнимательней код поковырять?

Так. Похоже это деталь-запрос не обновляется. Сейчас ещё помучаю...

ЕДРИТЬ ТВОИ ЛАПТИ!!!
aqAllObjects.Close; aqAllObjects.SQL.Add(ss); aqAllObjects.Open;

А SQL.Clear конечно, Дядя Вася делать будет...

Тьфу, блин, на такой ерунде пол-дня потерял...

> Дело в том, что он мне возвращает достаточно большую "деревянную" выборку, где надо данные подготовить на клиенте, и потом одной пачкой
> отправить на сервер. Пользование чем-либо, типа TTable не катит ...
"катит" пользоваться TADODataSet c установденным LockType в ltBatchOptimistic (батч апдейте режим - аналог клиентского датасета)
посмотри. всяко проще будет без "левых" длинных связок.

Мне тоже не понятно, зачем для "закачки" дерева и пакетного его обновления юзать CDS. Почему нельзя дерево держать в TList и пересоздавать его (все или начиная с соотв.узла) при перечитке детала.
А уже TList можно отображать в том же стрингриде (если, конечно, там не сотни тыщ записей) как таблицу

> Почему нельзя дерево держать в TList и пересоздавать его
> (все или начиная с соотв.узла) при перечитке детала.
> А уже TList можно отображать в том же стрингриде (если,
> конечно, там не сотни тыщ записей) как таблицу

Потому, что
a) На CDS смотрит DBTreeView
б) Нафига создавать дополнительные структуры, если уже готовые решения есть?
в) Ошибка была тривиальная. Всё уже прекрасно работает.

Refresh TClientDataSet по Master-Detail связке Найти похожие ветки