Pular linha (Arquivo texto)
Estou fazendo a exportacao de uma tabela do meu sistema.
Só que quando ele muda de registro nao esta mudando de linha.
Uso este comando :
Writeln(Arquivo,s);
O que eu gostaria e de forcar um pulo de linha manual, toda vez que ele caisse no meu loop.
Conto com a ajuda de vcs.
Obrigado
Fabio
Só que quando ele muda de registro nao esta mudando de linha.
Uso este comando :
Writeln(Arquivo,s);
O que eu gostaria e de forcar um pulo de linha manual, toda vez que ele caisse no meu loop.
Conto com a ajuda de vcs.
Obrigado
Fabio
Fhcesar
Curtidas 0
Respostas
Adriano Santos
26/02/2004
Cara, tinha que funcionar, mas de qualquer forma tente jogar uma caracter de quebra, não sei se estou falando bosta. Talvez funcione.
WriteLn(Arquivo,S + #1310);
GOSTEI 0
Paulo_amorim
26/02/2004
Olá
para pular linha, utilize Chr(13) ou #13. 13 eh o código ASCII do ENTER, assim como 9 eh do TAB.
Inclua isso na variável ´s´ que está usando
Espero que ajude
para pular linha, utilize Chr(13) ou #13. 13 eh o código ASCII do ENTER, assim como 9 eh do TAB.
Inclua isso na variável ´s´ que está usando
Espero que ajude
GOSTEI 0
Paulo_amorim
26/02/2004
SkyHawk,
Por que utilizar #10 após o 13? já vi muitas pessoas fazerem isso, entretanto não utilizo e encontro o mesmo efeito :!:
Obrigado
Por que utilizar #10 após o 13? já vi muitas pessoas fazerem isso, entretanto não utilizo e encontro o mesmo efeito :!:
Obrigado
GOSTEI 0
Adriano Santos
26/02/2004
Sabe que nunca tinha parado pra pensar, tava olhando na tabela ascii e o 10 é como se fosse nullo, não sei onde aprendi isso e nem porque, vc tem razão: o efeito é o mesmo.
GOSTEI 0
Paulo_amorim
26/02/2004
Olá
Eu também já olhei, e teoricamente seria:
#13 / 10 - Carriage Return / Line Feed
Entretanto esse Line Feed não me parece útil...
Eu também já olhei, e teoricamente seria:
#13 / 10 - Carriage Return / Line Feed
Entretanto esse Line Feed não me parece útil...
GOSTEI 0