Leitura de txt
Oi pessoal,
preciso fazer um programa que leia as txt´s de uma pasta procurando por nomes q estão cadastrados no meu banco de dados, sempre q for encontrado um dos nomes, o programa deve copiar o paragrafo e colar em um campo Memo do meu banco. Ao terminar um txt ele deve fechar e passar para o próximo até q já tenha lido todos.
obs.:
*Cada campo Memo deve receber apenas um paragrafo.
*Esta ñ é uma prioridade, mas, se possível, ao lado do campo Memo(em um campo Nome) , colar o nome q foi encontrado.
se puderem me ajudar, mtu obrigado! :D
preciso fazer um programa que leia as txt´s de uma pasta procurando por nomes q estão cadastrados no meu banco de dados, sempre q for encontrado um dos nomes, o programa deve copiar o paragrafo e colar em um campo Memo do meu banco. Ao terminar um txt ele deve fechar e passar para o próximo até q já tenha lido todos.
obs.:
*Cada campo Memo deve receber apenas um paragrafo.
*Esta ñ é uma prioridade, mas, se possível, ao lado do campo Memo(em um campo Nome) , colar o nome q foi encontrado.
se puderem me ajudar, mtu obrigado! :D
Tiagofxz
Curtidas 0
Respostas
Tolimpio
18/05/2006
Crie um objeto stringlist..... para manipular o arquivo.....
de o comando loadfromfile(´caminho do arquivo txt´);
percorra-o usando um laco....
use o metodo copy.... para pegar as informacoes de cada linha.....
acho q assim ja da pra comecar...........
mande o layout do arquivo ´txt´... para ficar mais claro.....
8)
de o comando loadfromfile(´caminho do arquivo txt´);
percorra-o usando um laco....
for i:=0 to objstringlist.count -1 do begin //brinque com o txt aqui.... end;
use o metodo copy.... para pegar as informacoes de cada linha.....
Ex: nome := copy(objstringlist.strings[i], 1, 50);
acho q assim ja da pra comecar...........
mande o layout do arquivo ´txt´... para ficar mais claro.....
8)
GOSTEI 0