Вопрос Master - Detail - SubDetail + ADOQuery/D7

Комментарии

• -=Serg=-

  September 2005 отредактировано 05:11

  написал:

  Только таблицы не связанны как родительская - дочерняя и компанентом TTable, а выборка происходит посредством запросов, при событии DataChange.

  Почему бы не сделать нормальную связку Master-Detail на уровне TADOQuery и не испытывать проблем с FR?
  (исходный код не качается)
• mmms

  September 2005 отредактировано September 2005

  Сори за ссылку, сайт у них видимо файлы не пропускает
  Эта рабочая:
  http://progres.h1.ru/fastreport_master_det...ubdetail_d7.zip
  
  -=Serg=-
  В моем случае, не знаю как сделать За выходные ещё попробую.
• Lex

  September 2005 отредактировано 05:11

  Я, при использовании TADOStoredProc + MSSQL и отсутсвии возможности реализовать мастер-детеил в хранимой процедуре, делал следующим образом
  в событии AftePrint MasterBand-а фызывал внешнюю функцию с параметром

   -------------------
    if MethodName = 'QUERY2_REFRESH' then 
    begin
      ADOQuery2.Active:=False;
      ADOQuery2.SQL.Text:='SELECT * FROM t2 WHERE id_t1= '+{параметр}+' ';
      ADOQuery2.Active:=True;
    end;
    -------------------
  

  в качестве параметра, в твоем случае, передовалось значения поля t1_rowid.
  то же самое можно сделать и для detail1-detail2
  
  как сделать внешнюю функцию хорошо расписано в документации.
• -=Den=-

  October 2005 отредактировано October 2005

  Простой пример можете взять Здесь (переделанный).
• mmms

  October 2005 отредактировано 05:11

  Lex
  Спасибо большое за ответ, я пока только начинаю разбираться с отчетами, сложновато с моим отчетом (с простыми отчетами работа идет без каких либо проблем) но делать все равно надо, буду разбираться с ф-ми.
  -=Den=-
  Скачал, то что надо! Правда были проблемы с переходом на 3.14, с 3.18, не большие, перенастроил поля, и все стало на место. Понятно значит, как это делается.. Все супер! Теперь все ясно. По покупке уже ясно, берем, думаю в конце этой - начеле следующей от нашей организации будет платеж.
• mmms

  October 2005 отредактировано 05:11

  -=Den=-
  У меня вопрос, не существенный конечно (можно даже сказать это совсем мелочь, просто интересно), главное все работает как надо! Ещё раз благодарю
  Когда делаю в Дизайнере - Отчет - Данные и отмечаю галочками 3 frxDBDataset, то отчет показывается в превью, в дизайнере. Сохраняю, выхожу. Из программы уже не печатается, пишет ошибку, EstackOverflow. Снимаю галочки в дизайнере, сохраняю, уже не работает превью в дизайнере, за то работает из программы (что и надо). Т.е. в отчте не надо хранить данные об frxDBDataset? Т.е. их помечать галочками?
• -=Den=-

  October 2005 отредактировано 05:11

  В примере я подключил DataSet динамически
  

    frxReport1.LoadFromFile('report.fr3',true);{загрузка отчёта из текушего каталога}
  
    frxReport1.DataSets.Add(frxDBDataset1);{подключаю 1-й датасет}
    frxReport1.DataSets.Add(frxDBDataset2);{подключаю 2-й датасет}
    frxReport1.DataSets.Add(frxDBDataset3);{подключаю 3-й датасет}
  {если их закоментировать то можно ставить галочки в дизайнере}
    
    MBand1:=frxReport1.FindObject('MasterData1') as TfrxMasterData;
    MBand2:=frxReport1.FindObject('MasterData2') as TfrxMasterData;
    DBand:=frxReport1.FindObject('DetailData1') as TfrxDetailData;
  {поиск бэндов на отчёте}
    MBand1.DataSet:= frxDBDataset1;
    MBand2.DataSet:= frxDBDataset3;
    DBand.DataSet:= frxDBDataset2;
  {подключение бэндов к датасетам}
  

  если закоментировать весь этот код , подключать датасеты придётся в дизайнере:
  1)report->data->выбрать датасеты.
  2)установить датасеты на бэнды (двойным кликом на бэнде).
  
  Читайте документачию там всё это описано.