Fórum Rave - Fazer com que só imprima com ID solicitado do usuario #345505
04/09/2007
0
Tenho um form de impressão que que tem um Edit e três botões.
Esse edit é para que o usuário só imprima o ID a sua escolha.
Tenho esse código que chama o projeto no rave:
Teria que implementar neste mesmo evento?
Vai aí como está meu SqlDataSet:
Se vcs reparam o id_projeto está com : na frente para receber o valor. Só não sei fazer isso com o relatório.
Alguem tem alguma ideia?
Esse edit é para que o usuário só imprima o ID a sua escolha.
Tenho esse código que chama o projeto no rave:
procedure TR_LANCAMENTO.imprimirClick(Sender: TObject); begin RvSystem1.DefaultDest := rdpreview; RvSystem1.DoNativeOutput := true; RvSystem1.RenderObject := nil; RvSystem1.OutputFileName :=´´; rprojectLancamentos.Open; rprojectLancamentos.SelectReport(´r_lancamento´, false); rprojectLancamentos.Execute; rprojectLancamentos.Close; end;
Teria que implementar neste mesmo evento?
Vai aí como está meu SqlDataSet:
select id_lancamento_projeto, id_projeto, cod_ordenado_m, quantidade_m, material.descricao, material.un, material.preco_unitario, total from lancamento_projeto left join material on (cod_ordenado_m=COD_ORDENADO) where id_projeto =:id_projeto order by id_projeto
Se vcs reparam o id_projeto está com : na frente para receber o valor. Só não sei fazer isso com o relatório.
Alguem tem alguma ideia?
Jpauloss
Curtir tópico
+ 0
Responder
Posts
05/09/2007
Jpauloss
Resolvi assim:
Coloquei no evento OnValidateRow do componente RvDataSetConnection:
Daí seleciono as linhas que quero e mando imprimir.
Coloquei no evento OnValidateRow do componente RvDataSetConnection:
procedure TF_LANCAMENTO_PROJETO.rdscLancamentosValidateRow( Connection: TRvCustomConnection; var ValidRow: Boolean); begin ValidRow := grid.SelectedRows.CurrentRowSelected; end;
Daí seleciono as linhas que quero e mando imprimir.
Responder
Gostei + 0
04/10/2007
Jpauloss
Resolvi assim:
Coloquei no evento OnValidateRow do componente RvDataSetConnection:
Daí seleciono as linhas que quero e mando imprimir.
procedure TF_LANCAMENTO_PROJETO.rdscLancamentosValidateRow( Connection: TRvCustomConnection; var ValidRow: Boolean); begin ValidRow := grid.SelectedRows.CurrentRowSelected; end;
E se for um edit pra o cliente selecione o ID sesejado, como fazer?
Responder
Gostei + 0
04/10/2007
Jpauloss
Tem como colocar algum parametro?
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)