отправить картинку на radikal.ru (INDY) [D7, WinXP]
Venkin © (2008-01-02 16:21:00)
подскажите как отправить картинку на radikal.ru с помощью Indy
(Tidhttp)?
делаю:
procedure TForm1.Button1Click(Sender: TObject);
var sl: Tstrings;
begin
sl := TStringList.Create;
idhttp1.HandleRedirects := true;
idhttp1.Disconnect;
browser.Silent := true;
sl.Add('test111=vvv');
sl.Add('upload=yes');
sl.Add('JQ=85');
sl.Add('F="C:\Image.jpg"');
sl.Add('CP=yes');
sl.Add('VE=yes');
sl.Add('VM=180');
sl.Add('Submit=1'); // тут чего писать?
try
memo1.Text := idhttp1.Post('
http://www.radikal.ru/action.aspx', sl);
finally
sl.Free;
end;
end;
в ответ получаю: "Ошибка. Отсутствует файл"
файл точно есть на винте..
MetalFan (2008-01-02 19:03:00) [1]
ну так файл то не отсылаешь...
> browser.Silent := true;
а это нафиг???
используй вместо TStringList TIdMultipartFormData
Наверх 
ЧАТ |
Орешник |
|
