Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как правильно использовать клоны курсора для отношений Master-Detail в FireDac? / 4 сообщений из 4, страница 1 из 1
13.10.2019, 19:18
    #39875694
Страдалецъ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как правильно использовать клоны курсора для отношений Master-Detail в FireDac?
Видимо я делаю что-то не так, но если я делаю клон курсора по мастеру и по детали, то перебор записей в клоне курсора для мастера не приводит к обновлению данных для клона курсора в детали. Делаю я так:
Код: pascal
1.
2.
3.
4.
 mtFiles := TFDMemTable.Create(nil);
 mtFiles.CloneCursor(FDFiles);
 mtMetering := TFDMemTable.Create(nil);
 mtMetering.CloneCursor(FDMetering,True,True);


и теперь если я буду перебирать записи для клона мастера
Код: pascal
1.
2.
3.
4.
5.
6.
while not mtFiles.Eof
 do begin
     OutputDebugString(PChar(mtFiles['RecID']))
     OutputDebugString(PChar(mtMetering['FileID']));
     mtFiles.Next;
     end;


Естественно отношение мастер-деталь для исходных FDFiles и FDMetering настроено и хорошо работает.
...
Рейтинг: 0 / 0
13.10.2019, 19:36
    #39875696
Dmitry Arefiev
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как правильно использовать клоны курсора для отношений Master-Detail в FireDac?
Мастер-детали и клоны никак не связаны. Клонам нужны свои установки.
...
Рейтинг: 0 / 0
13.10.2019, 19:38
    #39875697
Страдалецъ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как правильно использовать клоны курсора для отношений Master-Detail в FireDac?
А как тогда правильно сделать? Мне категорически не хочется создавать копию исходных запросов, но видимо иначе никак.
...
Рейтинг: 0 / 0
15.10.2019, 10:50
    #39876411
Hammer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как правильно использовать клоны курсора для отношений Master-Detail в FireDac?
СтрадалецъА как тогда правильно сделать? Мне категорически не хочется создавать копию исходных запросов, но видимо иначе никак.

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
var
...
  dsMaster: TDataSource;
...
begin
...
  mtFiles := TFDMemTable.Create(nil);
  try
    mtFiles.CloneCursor(FDFiles);
    dsMaster := TDataSource.Create(nil);
    try
      dsMaster.DataSet := mtFiles;
      mtMetering := TFDMemTable.Create(nil);
      try
        mtMetering.MasterSource := dsMaster;
        mtMetering.MasterFields :=
        mtMetering.DetailFields := 
        mtMetering.CloneCursor(FDMetering,True,True);
        ...
      finally
        FreeAndNil(mtMetering);
      end;
    finally
      FreeAndNil(dsMaster);
    end;
  finally
    FreeAndNil(mtFiles);
  end;
...
end


Не?
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как правильно использовать клоны курсора для отношений Master-Detail в FireDac? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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