![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Plugin под IE [Delphi, WinXP]
Demn © (2005-04-07 08:01:00)Прикол в следующем: прописываю интерфейс IObjectWithSite и два его метода.
Один из них выглядет так:
function TMyBrowserExt.SetSite(const pUnkSite: IUnknown): HResult;
var
sp: IServiceProvider;
begin
FWebBrowser := nil;
FSite := pUnkSite;
if FSite <> nil then
try
sp := pUnkSite as IServiceProvider;
OleCheck(sp.QueryService(Class_TMyBrowserExt, IWebBrowser2, FWebBrowser));
except
FWebBrowser := nil;
end
Result := S_OK;
end;
Суть: никак не могу понять, то ли не браузер не вызывает SetSite, либо я идиот. Потому как FWebBrowser всегда nil.
Demn (2005-04-07 15:34:00) [1]ВОПРОС СНИМАЕТСЯ!
Проблема решена.
Нужно заменить кривые руки на более прямые :))