====== Podsuma w nagłówku ======
- W zakładce **Code** zmień język programowania na **C + +** \\ ++Ekran 1|{{:podrecznik:globalne:suma1.png}}++
- Utwórz tyle zmiennych ile potrzebujesz podsumowań np: TStringList List;
int i; ++Ekran 2|{{:podrecznik:globalne:suma2.png}}++
- Kliknij w **Report**
- Zakładka **Event**
- Kliknij dwukrotnie w pustym polu po prawej stronie "OnStartReport" \\ ++Ekran 3|{{:podrecznik:globalne:suma3.png}}++
- Wpisujemy List = TStringList.Create(); dla każdej zmiennej
- Kliknij dwukrotnie w pustym polu po prawej stronie "OnStopReport" \\ ++Ekran 4|{{:podrecznik:globalne:suma4.png}}++
- Wpisujemy List.Free(); dla każdej zmiennej \\ ++Ekran 5|{{:podrecznik:globalne:suma5.png}}++
- Tworzymy szablon wydruku ze wstęgami **GroupHeader** oraz **GroupFooter**
- We wstędze GroupFooter tworzymy [[pl:podrecznik:globalne:szablony_wydrukow#sumowanie_wartosci|podsumowanie]]
- We wstędze GroupHeader tworzymy puste pole do którego będzie wpisywane podsumowanie \\ ++Ekran 6|{{:podrecznik:globalne:suma6.png}}++
- Wracamy do zakładki **Code**
- Klikamy **Page1** -> **Events**
- Klikamy dwukrotnie na **OnBeforePrint** \\ ++Ekran 7|{{:podrecznik:globalne:suma7.png}}++
- Wpisujemy wartość początkową dla zmiennych i=0; \\ ++Ekran 8|{{:podrecznik:globalne:suma8.png}}++
- Klikamy na **GroupFooter1** -> **Events**
- Klikamy dwukrotnie na **OnBeforePrint** \\ ++Ekran 9|{{:podrecznik:globalne:suma9.png}}++
- Wpisujemy polecenie dodania sumy utworzonej w punkcie 10 do listy np: List.Add( FloatToStr( SUM(,MasterData1,1) ) );
i++; \\ ++Ekran 10|{{:podrecznik:globalne:suma10.png}}++
- Klikamy **GroupHeader1** -> **Events**
- Klikamy dwukrotnie na **OnBeforePrint** \\ ++Ekran 11|{{:podrecznik:globalne:suma11.png}}++
- 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|{{:podrecznik:globalne:suma12.png}}++