
01.03.2012, 15:23
|
 |
Let Me Show You
|
|
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
|
|
Код:
var
IdMultiPartFormDataStream: TIdMultiPartFormDataStream;
begin
IdHTTP1.HandleRedirects:=True;
IdHTTP1.Request.UserAgent:='Mozilla/3.0';
IdMultiPartFormDataStream:=TIdMultiPartFormDataStream.Create;
IdMultiPartFormDataStream.AddFile('file', 'd:\Downloads\clouds.bmp', 'image/bmp');
Memo1.Text:=IdHTTP1.Post('http://zalil.ru/upload/', IdMultiPartFormDataStream);
IdMultiPartFormDataStream.Free;
end;
__________________
Пишу программы за еду.
__________________
|