Ajuda Com WebBrowser(Urgente)

[IReAnImAtIoN 0]

Olá pessoal,essa é minha primeira vez que estou postando aqui, mais é por um caso extremo que eu tentei varias vezes e não consegui.Bom vamos lá.

 

Meu problema é o seguinte:

 

Eu tenho um navegador,que é feito em abas ou seja quando clico em um botão "+" ele adiciona um sTabSheet(do alpha control) e um web browser,em Um page control.

Até ai tudo bem, *mas quando eu ponho nos botões de voltar,avançar,parar,ir,home, ele faz isso com apenas um webbrowser e não com todos.* mas ele deve voltar apenas a pagina do PageControl que esta ativa um StabSheet. Voces podem me passar um codigo me explicando como deve fazer isso. Ficarei muito grato por isso.

 

Codigos que usei:

 

Criando sTabSheet + Web Browser dentro Do Page Control.

 

 

var

ts : TsTabSheet;

wb: twebbrowser;

i: integer;

NewFrame : twebbrowser;

b : boolean;

tabsheet: tTabSheet;

webbrowser: twebbrowser;

 

begin

// Create new page

ts := TsTabSheet.Create(PageControl1);

ts.ImageIndex := PageControl1.PageCount;

ts.Caption :='Nova guia' + IntToStr(PageControl1.PageCount);

ts.PageControl := PageControl1;

// Change index of the page with '+' button

sTabSheet2.PageIndex := PageControl1.PageCount - 1;

// Show Close button on active tab

PageControl1.ActivePage.UseCloseBtn := True;

 

//Criando navegador na web

webbrowser := twebbrowser.Create(ts);

twincontrol(webbrowser).Name := 'WebBrowser' + inttostr(i + 1);

webbrowser.Align := alclient;

twincontrol(webbrowser).Parent := ts;

sStatusBar1.Panels[0].Text:=text;

 

end;

 

 

Botões voltar,avançar,ir,para,home,imprimir,vizualizar impressão,configuração da pagina:

Citação:

Citação:

 

Botão Voltar:

webbrowser.goback;

 

Avançar:

webbrowser.GoForward;

e Assim vai.

 

 

Botões de imprimir:(uso um unit chamdo WB Encontrei na net);

 

Não contem Var;

Citação:

begin

WB_ShowPrintDialog(WebBrowser);

E assim vai com esse tbm.

end;

 

 

E Eu preciso desse web browser para um softwar que estou desenvolvendo.Por favor me ajudem.

[iMelo~' 18]

Veja este seguinte video.

 

[video=youtube;BucsQulq0Uo]

[IReAnImAtIoN 0]

Veja este seguinte video.

 

[video=youtube;BucsQulq0Uo]

 

 

Olá,Muito obrigado pela resposta mais o problema e outro, eu ja tenho um navegador, com abas, o problema é que na aba 1 tem um webbrowser. e quando eu clico no botão "+" ele adiciona um webbrowser + "1" numero.

 

o problema é justamente isso, quando eu clico no avançar , voltar, parar, ir ele vai apenas o webbrowser principal e não o webbrowser que esta na tabSheet ativo, do page control e eu queria que quando eu mudase de aba ele volta,avançar,parar,ir apenas o web browser que esta sendo mostrado na tabSheet ativa, do Page Control.

 

(TabSheet é o componente do Pagecontrol,aquele com abas);

 

Se puder me ajudar ficarei muito grato.

Vlws.

[iMelo~' 18]

Veja este tutorial.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E este tambem

 

http://www.webcheats.com.br/forum/delphi-vb/464766-sistema-de-abas-para-navegadores-delphi.html

[IReAnImAtIoN 0]

Veja este tutorial.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

E este tambem

 

http://www.webcheats.com.br/forum/delphi-vb/464766-sistema-de-abas-para-navegadores-delphi.html

 

 

Amigo Muito o brigado mais o meu problema é com os botões Avançar,voltar,ir ,para. é que eles não voltam na pagina em que se encontra ativo um webbrowser.eles voltam apenas o primeiro webbrowser que eu crio.

Vlw mais ainda vou continuar procurando.

Abrazz!

[iMelo~' 18]

Se voce fazer conforme o tutorial acima manda nao terá erro garoto ^^

[IReAnImAtIoN 0]

Se voce fazer conforme o tutorial acima manda nao terá erro garoto ^^

 

Amigo,Eu ja fiz aquele tutorial mais ainda sim não funciona os bottões,voce poderia me explicar algum outro jeito,ou algum outro codigo.

 

Quando Aperto o botão de voltar por exemplo fica o seguinte erro: " Erro especifico."

 

Eu sei que tenque navegar mais os bottões não estão funcionando corretamente.

Eu consigo criar as abas e o web browser navegar e tudo mais.

 

os problemas são os bottões que não voltam,avançam,para ou navegam o webbrowser que esta mostrado no tabsheet.

 

Codigos que eu usei nos botões:

 

Voltar:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Avançar:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Parar:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Refresh:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

O Problema é Que isso funciona com 1 webBrowser. quando mudo de abas ele volta um webbrowser que nem era daquela aba Ajudaaaaaaaaaaaaaaaaa.

 

 

Vlw Abrazz!

[iMelo~' 18]

O Sistema de abas precisa ser verificado neh garoto , voce tem que declarar que quer usar na aba 2.

[IReAnImAtIoN 0]

O Sistema de abas precisa ser verificado neh garoto , voce tem que declarar que quer usar na aba 2.

 

Você pode me dizer como posso fazer isso? pode passar apenas um código? que o resto eu me viro!

è só para min ter uma noção.

 

Por que eu to pesquisando mais não consigo como fazer!

 

Pf me ajuda ai.

[iMelo~' 18]

vou montar um codigo base pra voce aqui e ja mando.

[IReAnImAtIoN 0]

vou montar um codigo base pra voce aqui e ja mando.

 

Muito obrigado por isso.

[' hard~* 1]

Tópico movido ....

[iMelo~' 18]

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

No "seuform" , voce coloca o nome da aba e tenta esse.