Android Question Text files with CRLF

[AlpVir]

I can not create text files that are readable by other programs such as Notepad (Windows).

Dim TW As TextWriter
TW.Initialize(File.OpenOutput(File.DirRootExternal,NomeFileLog,False))
TW.Writeline ("OziExplorer Track Point File Version 2.1")
TW.Writeline ("WGS 84")
TW.Writeline ("Altitude Is in Feet")
TW.Close

'-------------------------  CRLF
Dim TW As TextWriter
TW.Initialize(File.OpenOutput(File.DirRootExternal,NomeFileLog,False))
TW.Write ("OziExplorer Track Point File Version 2.1"&CRLF)
TW.Write ("WGS 84"&CRLF)
TW.Write ("Altitude Is in Feet"&CRLF)
TW.Close

'------------------------- CR
Dim TW As TextWriter
dim CR as string
CR=chr(13)
TW.Initialize(File.OpenOutput(File.DirRootExternal,NomeFileLog,False))
TW.write ("OziExplorer Track Point File Version 2.1"&CR)
TW.Write ("WGS 84"&CR)
TW.Write ("Altitude Is in Feet"&CR)
TW.Close

I also tried to initialize TextWriter with a Encoding (Windows-1252 e other)

TW.Initialize2 (File.OpenOutput (File.DirRootExternal,NomeFileLog, False), "Windows-1252")

The various lines are ALWAYS separated by an LF [chr (10), hexadecimal A] and not by a CRLF
How can we succeed ?
Thanks for the attention

 

[DonManfred]

CRLF is just 10 in b4x.... write chr(10)+chr(13) instead

 

[AlpVir]

It's just what I do in the second example, I tink

TW.Write ("OziExplorer Track Point File Version 2.1"&CRLF)
TW.Write ("WGS 84"&CRLF)
TW.Write ("Altitude Is in Feet"&CRLF)

 

[DonManfred]

TW.Write ("OziExplorer Track Point File Version 2.1"&chr(13)&chr(10))
TW.Write ("WGS 84"&&chr(13)&chr(10))
TW.Write ("Altitude Is in Feet"&&chr(13)&chr(10))

 

[AlpVir]

Nothing.
I look at files with FileAlyzer and always that damn $0A and not $0D0A
The problem is not trivial, since there are several hours behind me, without success.
A moment of calm and I look back, in a fresh mind.
Thanks for the moment.

 

[DonManfred]

CRLF As String
New line character. The value of Chr(10).

 

[AlpVir]

CR means Carriage Return and Worth Chr (13)
LF means Line Feed and Worth chr (10)
CRLF is a constant of B4A and is valid CHR (13) & Chr (10)

Android separates the rows with a chr (10).
Windows separates them with a CRLF
Right?

 

[DonManfred]

CRLF is a constant of B4A and is valid CHR (13) & Chr (10)

This is wrong. The constant CRLF in B4X is holding just a Chr(10).

https://www.b4x.com/android/forum/pages/results/?query=crlf

 

[MarcoRome]

In this way you see in correct mode both:

Dim TW As TextWriter
    TW.Initialize(File.OpenOutput(File.DirRootExternal,"test_caratteri3b.txt",False))
    TW.Write ("OziExplorer Track Point File Version 2.1"&Chr(0x0d)&Chr(0x0a))
    TW.Write ("WGS 84"&Chr(0x0d)&Chr(0x0a))
    TW.Write ("Altitude Is in Feet"&Chr(0x0d)&Chr(0x0a))
    TW.Close

 

[Erel]

I can not create text files that are readable by other programs such as Notepad (Windows).

Don't use Notepad. Any decent text editor should properly support Unix type end of lines. Notepad++ is a good option.

 

[MarcoRome]

Don't use Notepad. Any decent text editor should properly support Unix type end of lines. Notepad++ is a good option.

Infact with Notepad++ it looks normal

 

[AlpVir]

The final purpose of my app is not to create and display a text file in notepad. It is (fully achieved, thanks!) to create and display a text file in commercial software (CompeGPS Land) and also on a web page (with ASP, VBScript and Javascript scripts).
Thanks again to everyone!