1. Na seção privada do formulário, adicione a seguinte declaração:

private
FPathName: String;

2. Adicione o código abaixo no evento OnCreate do formulário:

3. Adicione o código abaixo no evento OnClick do Button:

4. Adicione o código abaixo no evento OnClick do Radio Button:

5. Adicione ppTypes à cláusula uses na unit do seu form.

Note: The ppTypes unit contains the declaration for all enumerated types and constants used in ReportBuilder. In this instance, it is needed to support the references to dtPrinter and dtScreen in the preceding button click event handlers.

Nota: A unit ppTypes contém a declaração para todos os tipos enumerados e constantes utilizadas no ReportBuilder. Neste caso, há a necessidade de apoiar as referências a dtPrinter e dtScreen nos eventos OnClick do botões.