Fórum DBEXPRESS EXPORTAR TXT #399153
13/04/2011
0
Boa tarde!
Tenho uma aplicacao de consulta feita no delphi no qual conecta no B.D oracle atraves do dbexpress+clientdataset. Toda minha pesquisa faço no sqlquery e passo os parametros de pesquisa nos edits no formulario e funciona perfeitamente e gera relatorio no rave no qual esta 100%. Inseri o componente TRVRENDERTEXT do rave para gerar um arquivo texto, porem o mesmo sai desalinhado, enquanto no pdf gera normal, igual no relatorio do rave. Tem como alinhar esse relatorio ou criar uma outra forma de eu gerar esse arquivo texto pelo dbexpress?
codigo botao pesquisar:
clientdataset1.Close;
sqlquery1.ParamByName('p_dtmovi').AsString := edit1.Text;
sqlquery1.ParamByName('p_dtmovf').AsString := edit3.Text;
//queryproducao.ParamByName('p_codestfilial').AsString := edit2.Text;
sqlquery1.ParamByName('p_codmovfilial').AsString := edit2.Text;
clientdataset1.Open;
codigo botao relatorio:
RvProject1.Close;
RvProject1.ProjectFile := 'vendas.RAV';
RvProject1.Open;
RvProject1.SetParam('dtmovi',edit1.Text);
RvProject1.SetParam('dtmovf',edit3.Text);
RvProject1.SetParam('codfilial',edit2.Text);
// RvDataSetConnection1 := SQLQuery; // coloca aqui a sua ibquery
RvProject1.Execute;
clientdataset1.ApplyUpdates(-1);
Obrigado!
Tenho uma aplicacao de consulta feita no delphi no qual conecta no B.D oracle atraves do dbexpress+clientdataset. Toda minha pesquisa faço no sqlquery e passo os parametros de pesquisa nos edits no formulario e funciona perfeitamente e gera relatorio no rave no qual esta 100%. Inseri o componente TRVRENDERTEXT do rave para gerar um arquivo texto, porem o mesmo sai desalinhado, enquanto no pdf gera normal, igual no relatorio do rave. Tem como alinhar esse relatorio ou criar uma outra forma de eu gerar esse arquivo texto pelo dbexpress?
codigo botao pesquisar:
clientdataset1.Close;
sqlquery1.ParamByName('p_dtmovi').AsString := edit1.Text;
sqlquery1.ParamByName('p_dtmovf').AsString := edit3.Text;
//queryproducao.ParamByName('p_codestfilial').AsString := edit2.Text;
sqlquery1.ParamByName('p_codmovfilial').AsString := edit2.Text;
clientdataset1.Open;
codigo botao relatorio:
RvProject1.Close;
RvProject1.ProjectFile := 'vendas.RAV';
RvProject1.Open;
RvProject1.SetParam('dtmovi',edit1.Text);
RvProject1.SetParam('dtmovf',edit3.Text);
RvProject1.SetParam('codfilial',edit2.Text);
// RvDataSetConnection1 := SQLQuery; // coloca aqui a sua ibquery
RvProject1.Execute;
clientdataset1.ApplyUpdates(-1);
Obrigado!
Marcos Souza
Curtir tópico
+ 0
Responder
Posts
17/04/2013
José
Este tópico esta sendo fechado por inatividade. Se necessário, sinalizar para que seja reaberto ou abrir um novo.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)