Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.10.13;
Скачать: CL | DM;

Вниз

Отменить сохранение файла в TWebBrowser   Найти похожие ветки 

 
BoRoda   (2010-03-28 03:25) [0]

Доброго времени суток!
При переходе на определённую ссылку TWebBrowser выдаёт диалог сохранения файла. Можно как-нибудь программно отменить сохранение? Чтоб в адресной строке осталась только прямая ссылка на файл.
Спасибо.


 
BoRoda   (2010-03-28 03:39) [1]

Опишу проблемку подробнее...
Есть страничка (именно страничка, а не ссылка на файл) в инете, при переходе на неё формируется файл и предлагается его сохранить. Если использую WebBrowser1.Navigate(<адрес страницы>) выскакивает тоже окно с предложением сохранить. Как сделать так, чтобы окно это не появлялось?
Мне нужно только ссылку на сам файл передать в Edit.


 
BoRoda   (2010-03-28 16:27) [2]

Нашел решение. Может и не совсем правильное, но работает! =)

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdHTTP1.Get("http://www.someurl.com/somescript.php?id=xxx&file=zip");
end;

procedure TForm1.IdHTTP1Redirect(Sender: TObject; var dest: String;
 var NumRedirect: Integer; var Handled: Boolean; var VMethod: String);
begin
  Edit1.Text:=dest;
end;

procedure TForm1.IdHTTP1Work(ASender: TObject; AWorkMode: TWorkMode;
 AWorkCount: Int64);
begin
  IdHTTP1.Disconnect;
end;


 
BoRoda   (2010-03-28 16:29) [3]

Через TWebBrowser решения как я понял нет.



Страницы: 1 вся ветка

Текущий архив: 2013.10.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.005 c
2-1358751985
Наталья
2013-01-21 11:06
2013.10.13
Timer vs ListBox


15-1367652485
Дмитрий С
2013-05-04 11:28
2013.10.13
Запуск от имени администратора моей программы.


15-1365872380
robt
2013-04-13 20:59
2013.10.13
крэш программы


2-1358932354
guest123
2013-01-23 13:12
2013.10.13
pointer как integer


15-1367613003
Юрий
2013-05-04 00:30
2013.10.13
С днем рождения ! 4 мая 2013 суббота