![]() |
|
#1
|
|||
|
|||
![]() Здравствуйте ребят. Перелопатил форумы, мозг вымотал себе уже.
Код:
procedure TForm4.FormCreate(Sender: TObject); begin Returning:=GetCurrentdir; WebBrowser2.Navigate(Returning+'.\html\Системная защита приложений MS Office\index.htm'); WebBrowser1.Navigate(Returning+'.\html\Системная защита приложений MS Office\системная защита.html'); end; procedure TForm4.WebBrowser2NewWindow2(ASender: TObject; var ppDisp: IDispatch; var Cancel: WordBool); begin ppDisp := WebBrowser1.DefaultInterface; end; Теперь не программно. В дельфине есть два компонента WebBrowser1 и WebBrowser2. Второй браузер-менюшка. Кликая на которую, менюшка не должна потухнуть и открыть все в одном окне (или закрыться как у меня это бывало). Хотя бы как нибудь Это как бы навигация такая. Иными словами, слева тыкая на меню- передаем во второй браузер. Причем документ уже открыт сам.. Если не так объяснил, могу выложить скрины.. что у меня есть.. Последний раз редактировалось one_v, 21.03.2015 в 20:01. |