HMGforum.com

Posted: **Sun Aug 02, 2020 1:10 pm**

Hi,

If we call StrFile as

STRFILE( "Initial Bytes", "File.dat", .T., 0 )

, then the string

Initial Bytes

is written to the end of the file.

If you write

Code: Select all

STRFILE( "Initial Bytes", "File.dat", .T., 1 )

, then the string is written properly beginning with the second byte (byte 1).

But there doesn't seem to be any way to write a string starting with the first byte (byte 0).

Posted: **Sun Aug 02, 2020 2:53 pm**

Hi,
if you are right it is an error in the source code (C:\harbour-core-master\contrib\hbct\ctstrfil.c):

Code: Select all

if( nOffset )
   hb_fsSeekLarge( hFile, nOffset, FS_SET );

the correct way would be:

Code: Select all

if( nOffset >= 0 )
   hb_fsSeekLarge( hFile, nOffset, FS_SET );

when the nOffset is zero the function write to the end of the file.

Posted: **Sun Aug 02, 2020 3:09 pm**

Ok, thanks. I'll do it a different way.

Regards,

srvet_claudio wrote: ↑Sun Aug 02, 2020 2:53 pm Hi,
if you are right it is an error in the source code (C:\harbour-core-master\contrib\hbct\ctstrfil.c):
Code: Select all
if( nOffset )
   hb_fsSeekLarge( hFile, nOffset, FS_SET );
the correct way would be:
Code: Select all
if( nOffset >= 0 )
   hb_fsSeekLarge( hFile, nOffset, FS_SET );
when the nOffset is zero the function write to the end of the file.

HMGforum.com

StrFile() doesn't seem to allow writing a string to the very beginning of a file

StrFile() doesn't seem to allow writing a string to the very beginning of a file

Re: StrFile() doesn't seem to allow writing a string to the very beginning of a file

Re: StrFile() doesn't seem to allow writing a string to the very beginning of a file