Problem with MemoWirit

[digitsoft]

Good afternoon
Can you tell me why MemoWirit writes strange characters at the end of the last line?

[Tom]

MemoWrit() adds an EoF-character to the file contens (HEX 1A, Dec 26). Use StrFile() instead (take care - parameters are exchanged), or the low level functions.

[skiman]

Hi,

You can use this as a replacement:

Code: Select all

function abomemowrite(cTargetFile,cBuffer)
******************************************
Local nTarget := FCreate( cTargetFile, FC_NORMAL )

if nTarget == -1
    return .F.
  else
    FWrite( nTarget, cBuffer)
    FClose(ntarget)
endif

return .T.

[k-insis]

This.

Also memoread/memowrit is not that good when using UTF-8 data ; it tries to do some chardata conversion on its own. Found it the hard way when using xml with international IBAN processing resoults years ago.

Using regular fileio functions is much safer choice.

Hi,

You can use this as a replacement:

Code: Select all

function abomemowrite(cTargetFile,cBuffer)
******************************************
Local nTarget := FCreate( cTargetFile, FC_NORMAL )

if nTarget == -1
    return .F.
  else
    FWrite( nTarget, cBuffer)
    FClose(ntarget)
endif

return .T.

[Tom]

StrFile() does the same, without any conversions.

[digitsoft]

MemoWrit() adds an EoF-character to the file contens (HEX 1A, Dec 26). Use StrFile() instead (take care - parameters are exchanged), or the low level functions.

thank you