🚀 go-pugleaf

Thanks for that, may have been a case of staring for so long I could not see
the obvious. I
have been cutting and pasting code from all over the place so I have
obviously made a mistake.

I could not see where to download that version from ?

I am getting 9.0.15 from the indy site.
I will make the changes that you have pointed out see how I go. the memory
leak was intentional ( this is just testing at the moment);

cheers

"Remy Lebeau (TeamB)" <no.spam@no.spam.com> wrote in message
news:4540405a$1@newsgroups.borland.com...
>
> "Nicholas Wilson" <nicholasjohnwilson@gmail.com> wrote in message
> news:45400f1d@newsgroups.borland.com...
>
> > I am using the 9.15 version of the Indy component.
>
> That is a very old version.  The current snapshot of Indy 9 is 9.0.50.
You
> should consider upgrading.
>
> > this is the sample code I cannot get to work.
>
> It does not work because you are uploading the wrong stream to the server.
> You are allocating a TMemoryStream named _params that you do not fill it
> with any data but you ar uploading it anyway.  You are then allocating a
> TIdMultiPartFormDataStream named _idmpfd that you are not uploading when
you
> should be.  You need to get rid of the _params stream altogether and
upload
> the _idmpfd stream instead.
>
> Not only that, but you are filling in the TIdMultiPartFormDataStream
> incorrectly anyway.  You should not be adding the file name and file data
as
> separate fields.  They belong to a single field in the HTML form, so you
> have to add them to the stream as a single field.
>
> Also, your code has memory leaks in it.  You need to free the streams you
> allocate.
>
> Try this instead:
>
>     void __fastcall TForm1::Button1Click(TObject *Sender)
>     {
>         AnsiString _html;
>         TIdMultiPartFormDataStream *_idmpfd = new
> TIdMultiPartFormDataStream;
>         try
>         {
>             ldhttp->Request->ContentType = _idmpfd->RequestContentType;
>
>             // AddFile() calls GetMIMETypeFromFile() when no ContentType
is
> specified
>             _idmpfd->AddFile("userfile", "formsource.h", "");
>
>             _html = ldhttp->Post ("http://192.168.87.69/upload.php",
> _idmpfd);
>         }
>         __finally {
>             delete _idmpfd;
>         }
>         ShowMessage(_html);
>     }
>
>
> Gambit
>
>