Mas se for prestar bem atenção ao formato do texto, basta remover as seguintes sequencias de caracteres por ponto-e-vírgula:
1) '","'; 2) ',"'; 3) '",' Isso não impacta, por exemplo, no conteúdo de um campo literal(string) como o que vc ilustrou. Pensei q isto estivesse claro! Sds. To: delphi-br@yahoogrupos.com.br From: ral...@gmail.com Date: Wed, 14 Jul 2010 11:54:06 -0300 Subject: RES: RES: [delphi-br] Importação de Arquivo O que ocorre é o seguinte: Neste arquivo texto contém um campo histórico da seguinte forma. exemplo: Pagamento efetuado em 25/14, visto que houve atraso. Note que existe uma vírgula dentro do histórico. Retirar as aspas duplas é beleza, porém, se for substituir as vírgulas por ponto e vírgula, a vírgula contida dentro do campo histórico também será substituída por ponto e vírgula. (é vírgula demais!) Neste caso, pode ser interpretada como novo campo. Será que existe alguma maneira de antes de eliminar as aspas duplas e substituir as vírgulas por ponto e vírgula, efetuar uma pesquisa em tudo que se encontra dentro das aspas duplas e se for encontrada alguma vírgula a mesma ser eliminada? Abraço. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Rubem Rocha Enviada em: quarta-feira, 14 de julho de 2010 11:03 Para: delphi-br@yahoogrupos.com.br Assunto: RES: RES: [delphi-br] Importação de Arquivo Prioridade: Alta Ora, o StringReplace vai retirar as aspas onde apenas haverão aspas, e o separador será ponto-e-vírgula. Não vejo problema nenhum nisso. Sds. De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> [mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> ] Em nome de Walter Chagas (Bol) Enviada em: quarta-feira, 14 de julho de 2010 08:00 Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> Assunto: Re: RES: [delphi-br] Importação de Arquivo Ruben, torno a questionar. E se tiver dois valores float na sequencia? Lembre-se que os valores float não vem entre aspas. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com <mailto:whitesockets%40hotmail.com> <mailto:whitesockets%40hotmail.com> SKYPE: WalterChagasJr ----- Original Message ----- From: Rubem Rocha To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> Sent: Tuesday, July 13, 2010 6:14 PM Subject: RES: RES: [delphi-br] Importação de Arquivo Simples! Faz um StringReplace() na linha lida fazendo as seguintes trocas: 1) De [,] para [;] 2) De [,] para [;] 3) De [,] para [;] Assim, a linha lida terá os valores dos campos delimitados por ponto-e-vírgula! Bem mais fácil pra ler, não? Sds. De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> [mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> ] Em nome de Walter Chagas (Bol) Enviada em: terça-feira, 13 de julho de 2010 17:06 Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> Assunto: Re: RES: [delphi-br] Importação de Arquivo Não não não não. Da forma como você está propondo, voce supoe que entre os valores do tipo String (que são delimitados por aspas duplas) pode vir apenas um valor float. Mas e se vier dois ou mais na sequência?? Veja o caso abaixo: "601","029",2.010,98,1.011,32,"01",20100517,17,05,20,10,"04","122","0003","2 ","002","0000","33901400","130.00" como ficaria este caso? []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com <mailto:whitesockets%40hotmail.com> <mailto:whitesockets%40hotmail.com> <mailto:whitesockets%40hotmail.com> SKYPE: WalterChagasJr ----- Original Message ----- From: Marcelo To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> Sent: Tuesday, July 13, 2010 5:29 PM Subject: Res: RES: [delphi-br] Importação de Arquivo tem que trocar a aspa dupla junta Walter, ai não tem enigma , pois nos valores decimais não será substituida. Ai ele terá um separador padrão o ponto e virgula. depois fica facil. ________________________________ De: Walter Chagas (Bol) <wchag...@bol.com.br <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> Enviadas: Terça-feira, 13 de Julho de 2010 17:09:01 Assunto: Re: RES: [delphi-br] Importação de Arquivo é mas e a virgula dos valores decimais?? É um enigma essa parada daí. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil wchag...@bol.com.br <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> <mailto:wchagasj%40bol.com.br> http://delphitocorporerm.blogspot.com/ http://twitter.com/wchagas MSN: whitesock...@hotmail.com <mailto:whitesockets%40hotmail.com> <mailto:whitesockets%40hotmail.com> <mailto:whitesockets%40hotmail.com> SKYPE: WalterChagasJr ----- Original Message ----- From: Marcelo To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> Sent: Tuesday, July 13, 2010 5:04 PM Subject: Res: RES: [delphi-br] Importação de Arquivo Já pensou em dar um StringReplace nas "," trocando por ";" ai voce teria um separador padrão ai facaria muito mais facil de trabalhar ________________________________ De: Ralp Alves Bezerra <ral...@gmail.com <mailto:ralprd%40gmail.com> <mailto:ralprd%40gmail.com> <mailto:ralprd%40gmail.com> > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> Enviadas: Terça-feira, 13 de Julho de 2010 16:09:57 Assunto: RES: [delphi-br] Importação de Arquivo Não estou conseguindo montar uma rotina para pegar os dados contidos dentro das aspas duplas e delimitadas por vírgula. Existe um campo no formato "100.000,00" que também contém vírgulas em seu conteúdo. De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> [mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> ] Em nome de Rubem Nascimento da Rocha Enviada em: terça-feira, 13 de julho de 2010 15:54 Para: delphi-br Assunto: RE: [delphi-br] Importação de Arquivo Prioridade: Alta Qual é exatamente a sua dificuldade? Sds. To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> From: ral...@gmail.com <mailto:ralprd%40gmail.com> <mailto:ralprd%40gmail.com> <mailto:ralprd%40gmail.com> <mailto:ralprd%40gmail.com> Date: Tue, 13 Jul 2010 15:50:44 -0300 Subject: [delphi-br] Importação de Arquivo Nobres colegas, estou tentando importar para o meu banco de dados um arquivo no formato txt com o formato abaixo: "601","029",201000,"02","01",20100512,"12050002",201005,"04","122","0003","2 ","002","0000","33901400","100.000,00" "601","029",201000,"02","01",20100517,"17050003",201005,"04","122","0003","2 ","002","0000","33901400","130.00" "601","029",201000,"02","01",20100517,"17050004",201005,"04","122","0003","2 ","002","0000","33901400","1.000,00" "601","029",201000,"02","01",20100524,"24050005",201005,"04","122","0003","2 ","003","0000","33903000","10.000,00" "601","029",201000,"03","01",20100503,"03050009",201005,"04","122","0003","2 ","006","0000","33903900","100,00" Já vasculhei a net e até o momento ainda não consegui nenhum êxito. Algum dos nobres colegas já efetuou este tipo de importação com um arquivo neste formato? Estou utilizando Delphi 7/Firebird 2.1 Grato. Ralp Alves _________________________________________________________________ ACESSE SEUS EMAILS DE QUALQUER LUGAR PELO SEU CELULAR. CLIQUE E VEJA COMO FAZER ISSO. http://celular.windowslive.com.br/hotmail.asp?produto=Hotmail&utm_source=Live_Hotmail&utm_medium=Tagline&utm_content=ACESSESEUS85&utm_campaign=MobileServices [As partes desta mensagem que não continham texto foram removidas] ------------------------------------ -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
