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

Вниз

Plugin под IE   Найти похожие ветки 

 
Demn ©   (2005-04-07 08:01) [0]

Прикол в следующем: прописываю интерфейс 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) [1]

ВОПРОС СНИМАЕТСЯ!
Проблема решена.
Нужно заменить кривые руки на более прямые :))



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

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

Наверх




Память: 0.46 MB
Время: 0.054 c
2-1136836506
ArtemESC
2006-01-09 22:55
2006.01.29
Автозагрузка...


15-1136518805
Nic
2006-01-06 06:40
2006.01.29
Экзамен по вычислительным машинам, сетям и системам телекоммуника


3-1132924044
PyJIbI
2005-11-25 16:07
2006.01.29
Путь в BDE к файлу базы Firebird


15-1136384875
AO
2006-01-04 17:27
2006.01.29
Сила воли и Терпение


2-1136904987
Ermal
2006-01-10 17:56
2006.01.29
Как вывести информацию о CPU на DELPHI 7