Página 1 de 1
ARQUIVO TXT DE 3 LINHAS
Enviado: 29 Jun 2006 22:30
por Sergio Cabral
Preciso criar arquivo TXT onde cada registro deve ter 1200 bytes dividos em 3 linhas. A questão é como dividir um só registro em 3 linhas dentro de um arquivo TXT pois quando se usa o comando SDF ele coloca tudo em uma linha só.
Se alguém souber, me ajude por favor!!!
Enviado: 30 Jun 2006 07:51
por Alessandro
Caro colega
Utilize as funções FCreate, FWrite e FClose.
Valeu
Enviado: 30 Jun 2006 09:41
por MARINI
Outra solução seria:
texto:=PADR('texto linha 1',400)+CHR(13)+CHR(10)
texto+=PADR('texto linha 2',400)+CHR(13)+CHR(10)
texto+=PADR('texto linha 3',400)+CHR(13)+CHR(10)
MEMOWRIT(NOME DO ARQUIVO,texto)
Enviado: 04 Jul 2006 09:47
por gvc
Outra-Outra solução seria:
set alternate to <nome do arquivo>
set alternate on
?? PADR('texto linha 1', 400)
? PADR('texto linha 2', 400)
? PADR('texto linha 3', 400)
set alternate off
set alternate to