| Автор
| Сообщение |
s2004
Новичок

Зарегистрирован: 01.12.2011
Сообщения: 1
|
|
|
Цитата |
|
Вот вопрос возник embeddedwb оnкрываем ссылку открывается новое окно и например, если я закрою первичное окно то закроется и дочернее окно, а возможен вариант, что бы при закрытие родительского окна не происходило закрытие и дочернего. Судя по всему iexplorer запускает вторую копию программы и туда подставляет урл. Как мне сделать, что бы при кликание на ссылку запуск проходил именно второй копии проги, плюс в строку адреса подставлялся урл ссылки?
Код срабатывающий при открытии ссылки внизу.
| delphi: | procedure TForm1.EmbeddedWB1NewWindow2(ASender: TObject; var ppDisp: IDispatch; var Cancel: WordBool); var NewWindow:TForm1; begin cancel := false; // новое значение NewWindow := TForm1.Create(parent); try finally SetWindowLong(NewWindow.Handle, GWL_EXSTYLE, GetWindowLong(NewWindow.Handle, GWL_EXSTYLE) or WS_EX_APPWINDOW); NewWindow.Show; ppDisp:=NewWindow.EmbeddedWB1.ControlInterface; end;
|
не получается главное, что то толком не нашёл место где можно заменить открытие дефаульт браузера на свой... Второй параметр Open или close или nil, но я так понял относится только по умолчанию браузеру, а как изменить на свой да с подстановкой ссылки для открытия одним словом код наверху и кучу за это время перебрал. Свой браузер не открывается по сылке, а только iexplorer.
| delphi: | ShellExecute(Handle,'open',PChar(d),PChar(newwindow.EmbeddedWB1.DefaultDispatch),nil, SW_SHOWNORMAL);
| [/list] |
|
| В начало |
|
 |
|
|
 |
|