DBEXPRESS EXPORTAR TXT
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
Curtidas 0
Respostas
José
13/04/2011
Este tópico esta sendo fechado por inatividade. Se necessário, sinalizar para que seja reaberto ou abrir um novo.
GOSTEI 0