Fórum Importar arq.txt #236189
04/06/2004
0
Ola Amigos, preciso importar arquivo.txt separado por virgula. Já procurei no forum mas nenhum exemplo ajudou eu, segue o arquivo exemplo abaixo.:
00001 ,LUIS ANTONIO ,
00002 ,PEDRO ANTONIO ,
00003 ,ALEXANDRE ,
00004 ,EMLIO
Até mais
00001 ,LUIS ANTONIO ,
00002 ,PEDRO ANTONIO ,
00003 ,ALEXANDRE ,
00004 ,EMLIO
Até mais
Bertocco
Curtir tópico
+ 0
Responder
Posts
04/06/2004
Xanatos
Bom...aconselho a voce usar um memo
Memo1.Lines.LoadFromFile(CaminhodoArq);
e dai pra frente voce vai lendo e procurando a ´,´ usando length(String) e tal!!!
Espero ter ajudado!!! :twisted:
Memo1.Lines.LoadFromFile(CaminhodoArq);
e dai pra frente voce vai lendo e procurando a ´,´ usando length(String) e tal!!!
Espero ter ajudado!!! :twisted:
Responder
Gostei + 0
04/06/2004
Thematrix:reloaded
É mais ou menos o seguinte:
Frase := ´00001,TESTE,´
Codigo := Copy(Frase,1,Pos(´,´,Frase));
Delete(Frase,1,Pos(´,´,Frase));
Nome := Copy(Frase,1,Pos(´,´,Frase));
valeu?
Frase := ´00001,TESTE,´
Codigo := Copy(Frase,1,Pos(´,´,Frase));
Delete(Frase,1,Pos(´,´,Frase));
Nome := Copy(Frase,1,Pos(´,´,Frase));
valeu?
Responder
Gostei + 0
05/06/2004
Aroldo Zanela
Colega,
A classe TStringList possui grandes facilidades para se trabalhar com arquivos ´flat-file´ (Texto) delimitados ou não, principalmente, a partir do Delphi6. Veja o help do Delphi e esta thread aqui: http://www.forumweb.com.br/forum/index.php?showtopic=1376 e observe bem a solução apresentada pelo Frank (In memoriam).
A classe TStringList possui grandes facilidades para se trabalhar com arquivos ´flat-file´ (Texto) delimitados ou não, principalmente, a partir do Delphi6. Veja o help do Delphi e esta thread aqui: http://www.forumweb.com.br/forum/index.php?showtopic=1376 e observe bem a solução apresentada pelo Frank (In memoriam).
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)