Как загрузить файл после программного нажатия кнопки загрузки, и, следовательно, не нужно знать URL для загрузки файла.

После загрузки файла появляется запрос и спрашивает,Я хочу сохранить файл после нажатияда' другое приглашение спрашивает, где выЯ хотел бы сохранить файл. Итак, файл загружается первым, может быть, где-то в буфер, после начальной загрузки появляются подсказки.

Итак, как только вы нажмете кнопку, как вы захватываете поток загрузки и сохраняете его как файл где-нибудь, без появления всплывающих подсказок?

(Любой метод для нажатия кнопки будет в порядке, следующее должно быть хорошо.)

procedure TForm1.Button1Click(Sender: TObject);
var
  x: integer;
  ovLinks: OleVariant;
begin
  WebBrowser1.Navigate('The web page');
  //wait for page to down load
  ovLinks := WebBrowser1.OleObject.Document.all.tags('A');
  if ovLinks.Length > 0 then
  begin
    for x := 0 to ovLinks.Length-1 do
      begin
        if Pos('id of button', ovLinks.Item(x).id) > 0 then
        //or if Pos('href of button', ovLinks.Item(x).href) > 0 then
        begin
          ovLinks.Item(x).click;
          Break;
        end;
      end;
  end;
end;

Причина этого вопроса: URL файла не всегда может быть найден. Например: на этомВеб-сайтЯ не могнайти URL программно, но после нажатия кнопки экспорта, используя IE, файл был загружен в 'Временные интернет файлы' папка. В IEВременные интернет файлы' папка имеет столбецИнтернет-адрес который показывает URL. Но в Chrome таких данных нет. НО, на этомВеб-сайтЯ могу найти URL программно, но когда я загружаю файл, нажимаяВот'файл не 'не появляются в IEВременные интернет файлы' папка. Для других веб-сайтов URL-адрес можно найти в папке и найти его программно, но на других сайтах URL-адрес не может быть найден в любом случае.