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;
запуск копии webbrowser с подстановкой адреса
Код срабатывающий при открытии ссылки внизу.
Код:
не получается главное, что то толком не нашёл место где можно заменить открытие дефаульт браузера на свой... Второй параметр Open или close или nil, но я так понял относится только по умолчанию браузеру, а как изменить на свой да с подстановкой ссылки для открытия одним словом код наверху и кучу за это время перебрал. Свой браузер не открывается по сылке, а только iexplorer.
Код:
ShellExecute(Handle,'open',PChar(d),PChar(newwindow.EmbeddedWB1.DefaultDispatch),nil, SW_SHOWNORMAL);
Он далеко не всегда запускает вторую копию программы. А место для открытия бразуера вы уже нашли - обработчик NewWindow2
верхний код прекрасно работает, но он запускает, как дочернее окно и проблема в том, что при закрытии первой формы закрывается и дочернее окно. поэтому я хочу запускать копию программы по ссылке с процедурой shelexecute. но с ней как то я практически не знаком программирование у меня хобби. поэтому перебрав кучу вариантов где в итоге запускаетмся копия но без подстановки адреса ссылки хотелось бы у опытных товарищей получить совет в виде примера.
Я как-то в итоге не въехал, что в конце-концов хочется сделать при клике по ссылке? И поясните где программа - ваша программа, а где IE. Потому что я писал про IE
bsalsa.com), но меня неудовлетворяет то, что при кликание по сылке в основном окне происходит открытие ссылки в новом окне, но как дочернем и если закрыть родительское окно происходит закрытие и дочернего. поэтому необходимо запустить копию своей программы с подстановкой адреса ссылки в неё. Самый верхний код работает, но только, как открытие дочернего окна это и есть обработчик newwindow2 который вы спрашивали. А проблема надо его изменить на то, что я написал в первой части этого сообщения.
у меня написанная программа на основе компонента embeddedwb (
Для запуска второго экземпляра нужно получить url нового окна и передать его второму экземпляру. Ну это в упрощенном виде.
я не в чём неуверен но надо попробовать