![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ActiveX и браузер [Delphi]
Alek_1 © (2007-05-07 13:23:00)подскажите...а как узнать урл браузера в котором загружен мой ActiveX???? и как вообще получить доступ к тому браузеру из которого загружен мой акьтив??
Alek_1 (2007-05-08 16:05:00) [1]вот пробую получить браузер который загрузил мой активикс:
function GetSite(obj: IUnknown): IOleClientSite;
var
Site: IOleClientSite;
OleObj: IOleObject;
begin
if (obj.QueryInterface(IOleObject, OleObj) = S_OK) and (OleObj.GetClientSite(Site) = S_OK) then
begin
Result := Site;
ShowMessage('gg');
end
else begin
Result := nil;
ShowMessage('not-gg');
end;
end;
Site := GetSite(Self);
но почемуто интерфейсы не определяются :(