Fórum Arquivo texto - quebra de linha #353273
07/02/2008
0
Sds!
Tenho um cliente usa um software de fechado que gera o arquivo texto sem as quebras de linhas.
Gostaria de saber como posso quebrar as linhas o arquivo texto.
Ex: abro arquivo pelo componentem Memo e em seguida clico num button que executa uma rotina que a cada 100 caracters e efetua um enter/return, quebrando a linha, e descedo para a próxima linha...
O tamanho dos campos estão padronizados.
Agradeço a todos!!!!
Tenho um cliente usa um software de fechado que gera o arquivo texto sem as quebras de linhas.
Gostaria de saber como posso quebrar as linhas o arquivo texto.
Ex: abro arquivo pelo componentem Memo e em seguida clico num button que executa uma rotina que a cada 100 caracters e efetua um enter/return, quebrando a linha, e descedo para a próxima linha...
O tamanho dos campos estão padronizados.
Agradeço a todos!!!!
Ricardoif
Curtir tópico
+ 0
Responder
Posts
07/02/2008
Rjun
Após o caracter que você deseja que seja o último, adicione #1310.
NovaLinha := Copy(Linha, 1, 100) + 1310;
Responder
Gostei + 0
07/02/2008
Ricardoif
Beleza!!
O que eu não sei é como posicionar o cursor na coluna desejada
repeat
1.Más eu preciso posicionar o cursor na coluna 100 e aplicar a quebra de linha.
2. Next para a linha seguinte...
until ...
Agradeço a ajuda!!!
O que eu não sei é como posicionar o cursor na coluna desejada
repeat
1.Más eu preciso posicionar o cursor na coluna 100 e aplicar a quebra de linha.
2. Next para a linha seguinte...
until ...
Agradeço a ajuda!!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)