Вот вопрос возник embeddedwb оnкрываем ссылку открывается новое окно и например, если я закрою первичное окно то закроется и дочернее окно, а возможен вариант, что бы при закрытие родительского окна не происходило закрытие и дочернего. Судя по всему iexplorer запускает вторую копию программы и туда подставляет урл. Как мне сделать, что бы при кликание на ссылку запуск проходил именно второй копии проги, плюс в строку адреса подставлялся урл ссылки?
Код срабатывающий при открытии ссылки внизу.
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.
ShellExecute(Handle,'open',PChar(d),PChar(newwindow.EmbeddedWB1.DefaultDispatch) ,nil, SW_SHOWNORMAL);