TXT Com Caracters indesejado

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Avatar do usuário
Gilberto M Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 230
Registrado em: 13 Mar 2007 18:00
Localização: Natal-RN / Parelhas(RN) / Natal(RN)
Contato:

TXT Com Caracters indesejado

Mensagem por Gilberto M Silva »

Pessoal, como faço para quando gerar um txt não gravar um caracter inicial que não foi enviado para o arquivo. Acredito que seja um indicativo de ponto inicial ou final é gerado um caracter, então quando o arquivo e enviado para o simulador não reconhece devido esse simbolo que vai junto. tem uma forma de gerar o arquivo eliminando esse simbolo??
Ex:arquivo em anexo
INTPOS.TXT
o caracter da linha 1, coluna 1
(88 Bytes) Baixado 146 vezes
Gilberto[]
A cada conversasão realizada conquistamos mais amigos, isto é um lucro inestimável
Clip5.2 DBFCDX
marcolinosilva@click21.com.br gmarcolinosilva@hotmail.com / Skype:gilberto.marcolino
Avatar do usuário
jairfab
Usuário Nível 3
Usuário Nível 3
Mensagens: 252
Registrado em: 21 Mai 2007 09:43
Localização: São Paulo, Região Leste - Suzano

TXT Com Caracters indesejado

Mensagem por jairfab »

Ja tentou fazer assim:

Código: Selecionar todos

ctexto:=fcreate('nome.txt')
** gravando o texto 
fwrite(ctexto,'linha inicial....01')+chr(13)+chr(10))
fwrite(ctexto,'linha inicial....02')+chr(13)+chr(10))
fwrite(ctexto,'linha inicial....03')+chr(13)+chr(10))
** fechando o arquivo
fclose(ctexto)
Delpji 7, harbour 3.2, xharbour 1.2.3, Bcc7, Minigw, Minigui 19.11, hwgui 2.20, FiveWin 19.05 Gtwvw, Gtwvg, C# VS 2017
anacatacombs
Membro Master
Membro Master
Mensagens: 472
Registrado em: 12 Jul 2005 16:53
Localização: Cianorte-Paraná
Contato:

TXT Com Caracters indesejado

Mensagem por anacatacombs »

Ué.
Não consegui visualizar o tal caracter estranho.
Avatar do usuário
Gilberto M Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 230
Registrado em: 13 Mar 2007 18:00
Localização: Natal-RN / Parelhas(RN) / Natal(RN)
Contato:

TXT Com Caracters indesejado

Mensagem por Gilberto M Silva »

Jairfab, como faço para gravar e pular uma linha?? pois tem que ficar um abaixo do outro
ex:
000-000 = crt
001-000 = 0000050
002-000 = 000050
003-000 = 000000001000
999-999 = 0

Ana, toda vez que o arquivo é gerado, na linha 1, coluna 1 fica gravado um caracter de inicialização talvez..., é que estou gerando useando set print to intpos.txt
@prow()+01,00 say "000-000 = crt"
quando grava essa linha no inicio fica gravado um caracter como se fosse marcando a inicialização do arquivo, da forma como o Jairfab postou deu certo só não pula uma linha.
Gilberto[]
A cada conversasão realizada conquistamos mais amigos, isto é um lucro inestimável
Clip5.2 DBFCDX
marcolinosilva@click21.com.br gmarcolinosilva@hotmail.com / Skype:gilberto.marcolino
anacatacombs
Membro Master
Membro Master
Mensagens: 472
Registrado em: 12 Jul 2005 16:53
Localização: Cianorte-Paraná
Contato:

TXT Com Caracters indesejado

Mensagem por anacatacombs »

Código: Selecionar todos

fwrite(Handle,Texto+CHR(13)+CHR(10))
Só faltou colocar o CHR(13)+CHR(10) com o texto, e não no final da função fwrite.
Avatar do usuário
Gilberto M Silva
Usuário Nível 3
Usuário Nível 3
Mensagens: 230
Registrado em: 13 Mar 2007 18:00
Localização: Natal-RN / Parelhas(RN) / Natal(RN)
Contato:

TXT Com Caracters indesejado

Mensagem por Gilberto M Silva »

funcionou perfeitamente :)) obg
Gilberto[]
A cada conversasão realizada conquistamos mais amigos, isto é um lucro inestimável
Clip5.2 DBFCDX
marcolinosilva@click21.com.br gmarcolinosilva@hotmail.com / Skype:gilberto.marcolino
Responder