[lmikle]

И чё? Все когда-то работали с чем-нить первый раз. Сидели и разбирались.

Вот мой тестовый код, который через форму одного из public image серверов заливает картинки. Он не доделан, т.к. все руки не доходят, но суть отправки формы поймешь.

Код:

procedure TForm1.btUploadClick(Sender: TObject);
var
  FormData : TIdMultiPartFormDataStream;
begin
  Try
    FormData := TIdMultiPartFormDataStream.Create;
    FormData.AddFile('userfile[]','E:\Photo\2007 USA\IMG_0794.jpg',GetMIMETypeFromFile('E:\Photo\2007 USA\IMG_0794.jpg'));
    FormData.AddFile('userfile[]','E:\Photo\2007 USA\IMG_0795.jpg',GetMIMETypeFromFile('E:\Photo\2007 USA\IMG_0795.jpg'));
    FormData.AddFormField('imgcontent','safe');

    Try
      HTTP.Request.ContentType := FormData.RequestContentType;
      edPage.Lines.Text := HTTP.Post('http://www.imagevenue.com/upload.php', FormData);
    Finally
      FormData.Free;
    End;
  Except
    On E : Exception Do
      ShowMessage(E.Message);
  End;
end;