>>Joe,Only chr(13) would be sufficient.
>
>That's true for the purpose of the editbox, but if you write that string to a file (StrToFile) then without the chr(10) the CR shows up as a black square in a simple editor like Notepad. Without testing the editbox, if it displays correctly using CRLFs, I'd use them because it'll be that much easier to output the strings to a text file. (guessing that the editbox value is stored in a memo field which might be dumped to a text file)
>
>If the editbox is used primarily for display only, it might make the code easier to read to not have all the extra chr(10).
>
>Joe, i usually make a CRLF variable:
>CRLF = chr(13) + chr(10)
>textline = "Line1" + CRLF + "Line2" + CRLF + CRLF + "Line4" [+ etc.]
>If you later wanted to change your 'line-end' characters, you change only the CRLF variable...
Michael,
Actually I wrote a long reply first but before sending cut the rest thinking this was an editbox thing only :)
If it's for something else then not only chr(10) but performance comes into play. I would first write to a lowlevel file than read from there. This seem to be a dummy thing to do but as linecount increases the speed difference is enormous. Here is what I mean with a rough and simple test code :
#define NL chr(13)+chr(10)
#define LINECOUNT 1000000
create cursor myDummy (dummy c(10))
for ix = 1 to LINECOUNT
insert into mydummy values (sys(2015))
endfor
start = seconds()
_Plain()
? seconds()-start
start = seconds()
_lowlevel()
? seconds()-start
function _lowlevel
#define MAX_WIDTH 65535
local lcTempFile, handle, lnSize, cContent
lcTempFile = sys(2015)+".tmp"
handle = fcreate(lcTempFile)
scan
=fputs(handle,dummy,MAX_WIDTH)
endscan
lnSize=fseek(handle,0,1)
=fseek(handle,0,0)
cContent=fread(handle,lnSize)
=fclose(handle)
erase (lcTempFile)
return cContent
function _Plain
local cContent
cContent = ""
scan
cContent = cContent + dummy + NL
endscan
return cContent
Cetin