Главная страница
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.007 c
15-1367332053
Кирилов В.А,
2013-04-30 18:27
2013.10.13
Замена процессора на ноутбуке


1-1316547907
adigozelov
2011-09-20 23:45
2013.10.13
How to compare two object


6-1269550140
Entropius
2010-03-25 23:49
2013.10.13
Заголовки запроса в TIDHTTP


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


1-1315514533
Дмитрий
2011-09-09 00:42
2013.10.13
Иконки 256x256 и delphi7