Ralp, Eu coloquei um Edit, um memo e um botão no form, no evento onclick do botão eu coloquei o código abaixo, este código gera uma linha para cada informação do registro, ai é só fazer o looping no memo.
var Str: TStringList; begin Str:=TStringList.Create; Str.Delimiter:=','; Str.DelimitedText:=Edit1.Text; Memo1.Text:=Str.Text; end; Teruel De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Ralp Alves Bezerra Enviada em: terça-feira, 13 de julho de 2010 15:51 Para: delphi-br@yahoogrupos.com.br Assunto: [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 [As partes desta mensagem que não continham texto foram removidas]
