Delphi + Rave: Exportar dados do Rave para o Excel

Publicado: agosto 19, 2011 em Delphi
Tags:, ,

Pessoal um cliente aqui da empresa queria de qualquer forma que fosse criada uma opção para exportar os dados constantes no relatório para o Excel. De tando pesquisar na net achei a solução, bem prática por sinal e a rotina é bem pequena. Vamos ao código.

 

  • Var
  •       Meustringlist : TSTringList;  // Declare a variável
  • begin
  •   MeuStringList : Tstringlist.Create;  // crie a variável em tempo de execução
  •   While not Query1.EOF do
  •     begin
  •       MeuStringList.Add(Query1.FieldByName(‘Campo1’).AsString + ‘;’ +
  •                                   Query1.FieldByName(‘Campo2’).AsString + ‘;’     {repetindo até atendender o todos os campos necessários});
  •     end;
  •   MeuStringList.SaveToFile(‘c:\MeuArquivoCSV.CSV’); // Diretório onde será salvo o arquivo
  •   MeuStringList.Free; // Libere a variável da memória com o .free
  • end;

Solução feita pelo moderador “bdexterholland” do forum.imasters.com.br, só tive que implementar umas coisas mas a lógica estava certinha.

Bem fácil, não?

Rairo

comentários
  1. Junior disse:

    Boa tarde, Rairo!

    Preciso passar um intervalo de datas numa query. Estou utilizando sua dica mas não consigo abrir os valores nela. Consigo criar o arquivo, porém em branco, pode me ajudar?

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s