---

Tarefa 3

Layout do relatório

1. Clique na guia Design;

2. Selecione File | Save e salve o relatório como “Print AutoSearch” em Completed Tutorials\Rap;

3. Desative a banda rodapé selecionando rodapé do menu Report;

4. Coloque uma variável na banda de detalhe;

5. Defina as propriedades da Variable1:

Font Arial
Size 14 pt.
Weight Bold
Color Black

6. Defina a posição da Variable1:

Left 0
Top 0.25
Width 0.8229
Height 0.2292

7. Coloque um Memo na banda de cabeçalho.

8. Clique com o botão direito no memo e sete a propriedade “position':

Left 0
Top 0
Width 4.0208
Height 0.5104

9. Defina a fonte:

Font Arial
Size 12 pt
Weight Bold
Color Black

10. Clique com o botão direito do mouse e defina o Memo para Stretch - isto irá manter as descrições de campo AutoSearch.

Tarefa 4

Escreva o código

1. Clique na guia Calc;

2. Clique com o botão direito na treeview do Code Explorer's e selecione Events;

3. Clique na opção Report;

4. Clique com o botão direito no evento OnStartPage e selecione New;

5. No Editor de código, digite o seguinte código (note que você pode “digitar” isso com a técnica de arrastar e soltar o código através do Code Toolbox):

Report.GetAutoSearchDescription-Lines(Memo1.Lines);

6. Clique com o botão direito no evento “OnCalc” da Variable1 e selecione New;

7. Digite o seguinte código no editor de código:

procedure Variable1OnCalc (var Value:Variant);
begin
  Value := Clients['First Name'] + ' ' + Clients['Last Name'];
end;