Банд «Header» и агрегатные функции

Комментарии

• aseroff

  June 2006 отредактировано 03:30

  Предлагаю следущий вариант для вычисления суммы в Header'е.
  Кидаем обработчик на Memo, которое находится в Header'е.
  

  void Memo1OnBeforePrint(TfrxComponent Sender)
  {
    Variant vSum = 0;   // будем хранить сумму, для начала, обнуляем
    // движемся по набору данных
    for (ADOQuery1.First (); !ADOQuery1.Eof; ADOQuery1.Next())
      vSum = vSum + <ADOQuery1."ID">;   //вычисляем сумму
    ADOQuery1.First ();   //для корректного последующего отображения НД
    Memo1.Memo.Text = VarToStr (vSum); //выводим сумму в Memo
  }
  

  
  Только не забудте после вычислений поставить ADOQuery1.First ();, иначе в MasterData НД не отобразится
• stuff_pkb Украина, Днепропетровск

  June 2006 отредактировано 03:30

  aseroff, спасибо тебе огромное. Но это немножко не то, что я хотел. У меня около 1000 ячеек и если подбивать сумму чисел в строках, таким образом, то на формирование отчета уйдет много времени.
  
  Вопрос поставлю по-другому:
  
  Когда отчет закончил формироваться, то можно ли пробежаться по сформированным строкам и подсчитать сумму чисел в строке и затем эту сумму впихнуть в текстовое поле, расположенное на банде «Header»?
  
  Как я понимаю, код подсчета суммы можно написать и в самом репорте. Например, в событии страницы OnAfterPrint.
  
  Если такой код возможен, то приведите, пожалуйста, пример.
  
  
• NordFalcon

  June 2006 отредактировано 03:30

  Насколько я понимаю, для этого у отчёта есть свойство - Два прохода. САм никогда не пользовался, но смысл понимаю так - первый рарз Фаст всё рассчитывает, а на втором проходе - печатает. ТОгда в заголовках можно выводить суммы.
• -=Den=-

  June 2006 отредактировано 03:30

  Как это сделать описано в документации.