Пытаюсь написать обертку на класс TCppWebBrowser и все вроди бы получилось но при попытке вызвать Navigate вылетает ексепшен с следующим сообщением (project Project1.exe raised exception class EPribilege with message 'Privileged instruction'.)
Пробовал резать код на куски чтобы найти в чем проблема, но непомогает. Вот полностью обрезаная версия в которой все ещо возникает эта ошибка. Поодскажите плиз как сделать паравильно?
#include <shdocvw_ocx.h>
class TWB : public TCppWebBrowser
{
public:
__fastcall TWB(HANDLE ParentWindow) : TCppWebBrowser(ParentWindow) {}
__fastcall TWB(Classes::TComponent* aowner) : TCppWebBrowser(aowner) {};
};
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TWB * WB = new TWB(Panel1);
WB->ParentWindow = Panel1->Handle;
WB->Left = 0;
WB->Top = 0;
WB->Align = alClient;
WB->Visible = true;
WideString WWW ="http://www.ya.ru";
WB->Navigate(WWW, 0); //вот на этой строке вылетает эксепшен (project Project1.exe raised exception class EPribilege with message 'Privileged instruction'.)
}
Заранее благодарен.