Мне нужно в отдельном потоке создать экземпляр TWebBrowser , Делаю так :
TMyThread = class(TThread)
protected
procedure Execute; override;

private
State : integer;
WBS : array[0..255] of TWebBrowser;
URL : String;
ProgBar : TProgressBar;
Constructor Create(CreateSuspennded: Boolean;URL1 : String;Pb:TProgressBar);
procedure OnNav(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
procedure OnNav2(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);
end;

....

procedure TMyThread.Execute;
var
wb : TWebBrowser;
begin
wb:=nil;
wb:=TWebBrowser.Create(nil); вот на этой строчке вылетает ошибка : CoInitialize has not been called.
wb.OnNavigateComplete2:=OnNav;
end;

Как с ней справиться? Вставлял CoInitialize(wb) говорит Undeclared Identifier ...

http://forum.vingrad.ru/index.php?oldss=3d...f=2&t=2757&st=0