Podsuma w nagłówku

  1. W zakładce Code zmień język programowania na C + +
    ++Ekran 1|++
  2. Utwórz tyle zmiennych ile potrzebujesz podsumowań np: 
     TStringList List;
   int i;

    ++Ekran 2|++

  3. Kliknij w Report
  4. Zakładka Event
  5. Kliknij dwukrotnie w pustym polu po prawej stronie „OnStartReport”
    ++Ekran 3|++
  6. Wpisujemy 
      List = TStringList.Create();

    dla każdej zmiennej

  7. Kliknij dwukrotnie w pustym polu po prawej stronie „OnStopReport”
    ++Ekran 4|++
  8. Wpisujemy 
     List.Free();

    dla każdej zmiennej
    ++Ekran 5|++

  9. Tworzymy szablon wydruku ze wstęgami GroupHeader oraz GroupFooter
  10. We wstędze GroupFooter tworzymy podsumowanie
  11. We wstędze GroupHeader tworzymy puste pole do którego będzie wpisywane podsumowanie
    ++Ekran 6|++
  12. Wracamy do zakładki Code
  13. Klikamy Page1 → Events
  14. Klikamy dwukrotnie na OnBeforePrint
    ++Ekran 7|++
  15. Wpisujemy wartość początkową dla zmiennych 
     i=0;


    ++Ekran 8|++

  16. Klikamy na GroupFooter1 → Events
  17. Klikamy dwukrotnie na OnBeforePrint
    ++Ekran 9|++
  18. Wpisujemy polecenie dodania sumy utworzonej w punkcie 10 do listy np: 
           List.Add( FloatToStr( SUM(<analiza."ilosc_wykonana">,MasterData1,1)  ) );
       i++;


    ++Ekran 10|++

  19. Klikamy GroupHeader1 → Events
  20. Klikamy dwukrotnie na OnBeforePrint
    ++Ekran 11|++
  21. Wpisujemy polecenie wpisania wartości do utworzonego w punkcie 11 pustego pola np: 
            if ( Engine.FinalPass )
       {
               Memo12.Text = Format( "%2.4n", [ StrToFloat( List[ i ] ) ] );
       }


    ++Ekran 12|++