como puedo grabar un ficheo ascii con varias lineas
como puedo grabar un ficheo ascii con varias lineas
Asi:
cText := "primera linea"+CRLF
cText += "segunda linea"+CRLF
cText += "tercera linea"+CRLF
....
....
....
cText += "n-sima linea"+CRLF
MEMOWRIT(curdir()+"\archivo.txt",cText)
Necesito saber como se usa en FWRITE, cada FWRITE que haga necesito que se escriba en una linea distinta, el problema que tengo es que escribo el texto pero no me salta de linea
He probado con el CTRLF Y DESPUES CON EL CHR(10)+CHR(12)+CHR(13), pero sigue sin saltarme de linea, me escribe todo en una linea.
Lo que quiero es escribir un fichero ASCI con los pedidos para poder enviarlo por correo electronico.
imjcc
En vez de usar FWrite(), guarda el texto en una variable en memoria y sálvala al final como te indica René
no puedo usar una variable, ya el el pedido puede tener hasta 100 lineas, entonces no va a coger toda la variable en memoria y pueden ser varios pedidos de distintos clientes.
nHand:=fCreate('fichero.txt',FC_NORMAL)
While !CabVta->(Eof())
fWrite(nHand,Str(CabVta->Total))
fWrite(nHand,'lo que sea')
fWrite(nHand, Chr(13)+Chr(10) )
CabVta->(dbSkip())
End
fClose(nHand)