Tarefa 3

Insira o seguinte código para o evento OnPrint do label

1. Clique com o botão direito em Code Explorer e selecione Events;

2. Crie o evento OnPrint para o Label1 clicando com o botão direito em “OnPrint” e selecionando “New”;

procedure Label1OnPrint;
var
  liItem: Integer;
begin
  liItem := (Detail.Count-1) mod 2;
  Label1.Caption := gStringList[liItem];
end;

3. Clique com o botão direito e selecione “Compile”;

4. Visualize o relatório. Seu relatório deve ficar assim:

5. Click na guia Design;

6. Salve e feche o relatório;

Parabéns! Você já sabe como usar RAP para imprimir o valor de uma stringlist global.