Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  • O primeiro passo, e muito importante, é verificar a ordem dos filtros no condutor de dados, pois você terá que passar essa informação no evento da variável ou label.
  • Na imagem abaixo, o campo CodEmpresa da tabela Nota Fiscal é a posição 0 e o campo DataNF da mesma tabela é a posição 1, e assim por diante.


Image Modified


...

(seleção) Como imprimir o período digitado pelo usuário.
  • Nos Eventos do Report Builder, acesse o evento OnPrint de um objeto Label, e coloque o seguinte comando:

    Bloco de código
    begin
      Label12.Caption := DateToStr(Report.AutoSearchFields[parametro].Value)+ ' a ' +   
      DateToStr(Report.AutoSearchFields[parametro].Value);
    end;



O comando AutoSearchFields[RTF:1].Value irá pegar o campo digitado na posição 1, e o DateToStr converte a data para string.

[parametro] - Deverá ser preenchido sempre com a posição do parâmetro que você quer pegar.

...

  • Nos Eventos do Report Builder, acesse o evento OnPrint de um objeto Label, e coloque o seguinte comando:begin
      if


Bloco de código
begin
  if Report.AutoSearchFields[RTF:0].ShowAllValues then begin

...


  Text := *'Todas as Empresas'

...

;
end else begin
  Text := NotaFiscal['NomeUsual'];

...


end;



O comando Report.AutoSearchFields[parametro].ShowAllValues identifica quando o usuário seleciona a opção de todos.
[parametro] - Deverá ser preenchido sempre com a posição do parâmetro que você quer pegar.



Feito isso, se o usuário selecionar uma determinada empresa será impresso o nome usual daquela empresa se ele selecionar Mostrar todos os valores do campos CodEmpresa, no relatório será impresso "Todas as Empresas".

...