Форум: "Сети";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
ВнизКак запустить из Delphi IE с определенным URL? Найти похожие ветки
← →
manner (2003-01-24 19:51) [0]Есть список URL.
Нужно:
1. Запустить IE.
2. Обойти все URL по списку, загружая их в одно и то же окно IE, последовательно.
Спасибо.
← →
int64 (2003-01-24 23:52) [1]uses ..., SHDocVw;
...
procedure TForm1.Button1Click(Sender: TObject);
var IE: IWebBrowser2;
v: OleVariant;
begin
IE := CreateOleObject("InternetExplorer.Application") as IWebBrowser2;
IE.Visible:= True;
IE.Navigate("c:\temp\1.htm", v, v, v, v);
while IE.ReadyState<>READYSTATE_COMPLETE do
Application.ProcessMessages;
IE.Navigate("c:\temp\2.htm", v, v, v, v);
while IE.ReadyState<>READYSTATE_COMPLETE do
Application.ProcessMessages;
...
IE.Quit;
end;
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2003.03.13;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c