---

1. Vá até a parte superior da unit rbSectSR, dê um duplo clique no nome da classe TfrmSectionSubreports, e copiá-la para a área de transferência.

2. Vá até a seção de implementação e substituir o nome da classe existente (TfrmStockSummary) para cada evento com o novo nome da classe (TfrmSectionSubreports).

3. Duplo clique no componente report rbSectSub para exibir o Report Designer.

4. Clique na guia srStockSummary na parte inferior do Report Designer.

5. Clique no espaço em branco da banda de cabeçalho do grupo.

6. Selecione a guia Eventos do Object Inspector.

7. Selecione o evento BeforeGenerate, em seguida, expanda a lista drop-down de eventos e selecione essa rotina:

ppGroupHeaderBand1BeforeGenerate

8. Selecione o evento AfterGenerate para garantir que a missão foi bem sucedida.

9. Clique no espaço em branco da banda de detalhe.

10. Selecione o evento BeforeGenerate, em seguida, expanda a lista drop-down de eventos e selecione essa rotina:

ppGroupHeaderBand1BeforeGenerate

11. Selecione o evento AfterGenerate para garantir que a missão foi bem sucedida.

12. Clique mais uma vez no espaço em branco da banda de cabeçalho do grupo e dê um duplo clique sobre o evento “Before-Generate” para ativar o code editor. Alterar o 'if' na última linha do evento para se referir a srStockSummay em vez de rbStock-Sum. O código deve ser assim:

if srStockSummary.Report.Groups[0].FirstPage then

Nota: O evento original se refere ao componente relatório rbStockSum. Este evento tem de ser alterado para se referir ao componente Report dentro do sub-relatório srStock. O componente sub-relatório na verdade consiste de dois componentes: o componente sub-relatório e o componente Report contido dentro dele. O componente de sub-relatório é usado para posicionar o sub dentro do relatório pai e para fixar vários propertiesrelated para modos de impressão. O componente Report pode ser consultado através da propriedade Report e contém o próprio relatório. Este componente não é diferente do componente Report que você trabalha em um form Delphi.

13. Desça até a banda de resumo e reconecte os componentes Variable para seus correspondentes eventos OnCalc:

Component Event
vrBuyTotal vrBuyTotalCalc
vrHoldTotal vrHoldTotalCalc
vrSellTotal vrSellTotalCalc

Nota: Este tutorial mostra como se reconectar aos eventos do relatório de resumo de modo que você possa entender melhor a situação. Se tivéssemos copiado esses eventos para a unit SectSub antes de nós carregamos o relatório de resumo no sub-relatório, os eventos seriam reconectados automaticamente por objeto de streaming lógica do Delphi. (Você deve se lembrar que uma mensagem de erro informando que os eventos não puderam ser encontrados foi exibida quando nós carregamos o layout do relatório.) É importante saber que os eventos são reconectados com base no seu nome de procedimento. Quando você quer eventos para reconectar automaticamente, eles devem ter os mesmos nomes que os salvos no layout do relatório.

14 Selecione “File | Save” a partir do menu principal do Delphi.

15. Executar o projeto. O relatório de resumo agora deve ser codificados por cores e os totais devem calcular corretamente.