🚀 go-pugleaf

The code worked fine!
Again: thank's.
Jonny

"Jonny" <jonny.heyman@cekab.se> wrote:
>
>Thank's I'll try this and get back ?
>Jonny
>
>"Remy Lebeau \(TeamB\)" <no.spam@no.spam.com> wrote:
>>
>>"Jonny" <jonny.heyman@cekab.se> wrote in message
>>news:42806d24$1@newsgroups.borland.com...
>>
>>> Having syntax problem with the code:
>>
>>What EXACTLY are you having a problem with?  Please be more specific.
>>
>>> What should it look like to handle upload request ie. put from a ftp
>>client?
>>
>>You are supposed to be creating a suitable TStream object, such as a
>>TFileStream, to handle the file storage.  For example:
>>
>>    void __fastcall TfrmMAIN::IdFTPServerStoreFile(TIdFTPServerThread
>>*ASender, const AnsiString AFileName, bool AAppend, TStream *&VStream)
>>    {
>>        // translate AFileName from an FTP-relative path
>>        // into a local HD path as needed, then...
>>        AnsiString LocalFileName = "...";
>>
>>        Word Flags;
>>        if( (AAppend) && FileExists(LocalFileName) )
>>            Flags = (fmOpenReadWrite | fmShareDenyWrite);
>>        else
>>            Flags = fmCreate;
>>
>>        VStream = new TFileStream(LocalFileName, Flags);
>>    }
>>
>>
>>Gambit
>>
>>
>