Importar arq.txt
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
Curtidas 0
Respostas
Xanatos
04/06/2004
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:
GOSTEI 0
Thematrix:reloaded
04/06/2004
É 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?
GOSTEI 0
Aroldo Zanela
04/06/2004
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).
GOSTEI 0