🚀 go-pugleaf

Hello Remy,
1. I fail to write or complete this code! return me two errors.
    {a. Stream read error.
    {b. File1: MyFile.001, File2: MyFile.003, File3: MyFile.005 and ...
2. Your simple code dosn't write any file!, excuse me.

Thanks a lot,
Safari

Remy Lebeau (TeamB) wrote:
> Simply read the file in a loop, each iteration of the loop reading a block
> of data and processing it as needed, continuing until the loop has read the
> entire stream in full.  For example:
> 
>     int iSourceFile = FileOpen("C:\\somefile.ext", fmOpenRead |
> fmShareDenyWrite);
>     if( iSourceFile == -1 )
>     {
>         BYTE buffer[50000];
>         int iNum = 1;
> 
>         do
>         {
>             int iRead = FileRead(iSourceFile, buffer, 50000);
>             if( iRead != -1 )
>             {
>                 if( iRead == 0 )
>                     break;    // finished
> 
>                 AnsiString ext = Format("%.3d", ARRAYOFCONST(( iNum++ )));
> 
>                 int iNewFile = FileCreate("c:\\MyFile." + ext);
>                 if( iNewFile != -1 )
>                 {
>                     if( FileWrite(iNewFile, buffer, iRead) != iRead )
>                         // an error occured, handle it as needed
> 
>                     FileClose(iNewFile);
>                 }
>                 else
>                     // an error occured, handle it as needed
>             }
>             else
>                 // an error occured, handle it as needed
>         }
>         while( true );
>         FileClose(iSourceFile);
>     }
>     else
>         // an error occured, handle it as needed
> 
> Gambit