Bom dia,

 

Desculpe pela demora na resposta.

 

Consegui resolver utilizando o StringReplace. Tratei o arquivo antes e
depois fiz a importação normalmente.

 

Gostaria de agradecer a atenção e as dicas de todos.

 

Abraços.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Dirlei
Enviada em: sexta-feira, 5 de março de 2010 11:44
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] importar arquivo com qualificador de texto

 

  

Ralph,

Para retirar as aspas, você pode utilizar:
StringReplace(<linha do arquivo>, '"', '', [rfReplaceAll]);

Para fazer "split" dos valores separados por vírgula, você pode utilizar 
uma função que fiz para isso. Disponibilizei em: 
http://pastebin.com/ZfAGxK5i (use à vontade, mas mantenha a atribuição).

Dirlei.

Ralp Alves Bezerra escreveu:
> 
>
> Nobres colegas,
>
> Estou tentando importar um arquivo texto no seguinte formato:
>
> "601","029",200900,"01","01",20091201,"01120001",200912,"01","031"
>
> "601","029",200900,"01","01",20091201,"01120001",200912,"01","031"
>
> "601","029",200900,"01","01",20091201,"01120001",200912,"01","031"
>
> Porém, esbarrei no qualificador de texto (aspas).
>
> Como poderia fazer a importação deste arquivo delimitado por vírgula e com
> as aspas?
>
> Alguém já efetuou este processo ou tem alguma idéia de como devo proceder?
>
> Já dei uma olhada no velho amigo Google e não consegui nada.
>
> Estou utilizando delphi7 e firebird 2.1.
>
> Abraços.
>
> Ralp Alves
>
>
>
> 





[As partes desta mensagem que não continham texto foram removidas]

Responder a