ayuda webbroser

[pepitin89]

mi problema es el siguiente, hay sitios web que cuando uno pincha en un link se le abre otra pestaña en el navegador, ok el problema es que cuando utilizo un webBrowser y doy clic en un link de esos se me abre el explorador por defecto, ya se como evitarlo:


procedure TForm1.WebBrowser1NewWindow2(ASender: TObject; var ppDisp: IDispatch;
var Cancel: WordBool);
begin
Cancel:=True;
end;


ese no es el problema el problema, lo que quiero es capturar la dirección para abrirla en otro WebBrowser.

saludos.

[beginner01]

Empezado por pepitin89

ese no es el problema el problema, lo que quiero es capturar la dirección para abrirla en otro WebBrowser.

saludos.

hola!
soy nuevo en este foro asi que no se si este mensaje quedara
vien editado pero espero poder ayudarte.
co este codigo te abrira iuna nueva ventana de tu navegador
evitando que se ejecute el de intrnet explorer.

Código Delphi [-]

procedure TForm1.wb1NewWindow2(Sender: TObject; var ppDisp: IDispatch;var Cancel: WordBool);
 var
 ventana2: tform1;
begin
  Application.CreateForm(tForm1,ventana2);
    ventana2.wb1.RegisterAsBrowser := true;
      ppDisp := ventana2.wb1.Application;
       ventana2.Top:=ventana2.Top+20;
          ventana2.Left:=ventana2.Top+20;
             ventana2.Show;
          end;

espero te sirva de algo...

[pepitin89]

ok lo pruevo muchas gracias