| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: ActiveX/СОМ/CORBA > Как создать TWebBrowser в ран-тайм? |
| Автор: bloodman 14.11.2004, 21:57 |
| Мне нужно в отдельном потоке создать экземпляр 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 ... |
| Автор: Alex 14.11.2004, 22:15 |
| http://forum.vingrad.ru/index.php?oldss=3d8858bd36ebffff&act=ST&f=2&t=2757&st=0 |