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

Вниз

Как обратиться к IE как к серверу COM ?   Найти похожие ветки 

 
Геннадий   (2002-10-09 20:38) [0]

Например узнать, что хочет загрузить броузер? Какая страничка сейчас открыта и прочее. Как ему вместо запрашиваемой "подсунуть" свою/другую ? В общем, как к нему подключиться и как им управлять?


 
Opuhshii ©   (2002-10-10 10:52) [1]

легко,... %)


uses SHDocVw;

procedure TForm1.Button1Click(Sender: TObject);
var
SWs:ShellWindows;
IE:Variant;
Doc:Variant;
I:Integer;
begin
SWs:=CoShellWindows.Create;
for i:= 0 to SWs.Get_Count-1 do begin
IE:=SWs.Item(i);
Doc:=IE.Document;
Memo1.Lines.Add(IE.LocationName+" "+Doc.Title);
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
SWs:ShellWindows;
IE:Variant;
I:Integer;
begin
SWs:=CoShellWindows.Create;
for i:= 0 to SWs.Get_Count-1 do begin
IE:=SWs.Item(i);
IE.Navigate(" http://student.noolab.ru");
end;
end;


 
Геннадий   (2002-10-10 11:32) [2]

Спасибо.



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

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

Наверх




Память: 0.46 MB
Время: 0.021 c
4-36469
FILINMAN
2002-10-29 20:54
2002.12.12
Работа с окнами в текущей сессии WindowXP(Fast User Switch)


3-36008
ao1973
2002-11-23 20:25
2002.12.12
Еще раз о транзакциях в MSSQL


3-36056
Григорий Ситнин
2002-11-22 15:18
2002.12.12
Защита файлов базы Interbase


14-36416
Lamer86
2002-11-22 18:01
2002.12.12
Я возмущён такой несправедливостью


14-36414
XMblPb
2002-11-22 18:07
2002.12.12
Ошибка Undeclared identifier при чтении/записи ini-файлов.