Histórico da Página
...
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Classe: TIBrowserCria um objeto do tipo página de internet. TSrvObject -> TControl -> TIBrowser NewMétodo construtor da classe.TIBrowser(): New ( [ nRow], [ nCol], [ nWidth], [ nHeight], [ cPage], [ oWnd] ) --> oObjeto
oObjeto
oTIBrowser:= TIBrowser():New(0,0,260,184,'http://www.totvs.com.br',oDlg ) GoHomeDireciona para a página (URL - Uniform Resource Locator) configurada na construção do objeto.TIBrowser(): GoHome ( ) -->
Nota |
Este método não foi implementado para SmartClient HTML. Sempre será redirecionado para uma página em branco. TButton():New( 172, 052, "GoHome", oDlg,; {|| oTIBrowser:GoHome() },40,010,,,.F.,.T.,.F.,,.F.,,,.F. ) NavigateDireciona para uma nova página Web.TIBrowser(): Navigate ( < cUrl> ) -->
TButton():New( 172, 002, "Navigate", oDlg,; {|| oTIBrowser:Navigate( "http://www.rm.com.br" ) },40,010,,,.F.,.T.,.F.,,.F.,,,.F. ) Abre uma janela para impressão da página.TIBrowser(): Print ( ) --> TButton():New( 172, 102, "Print", oDlg,; {|| oTIBrowser:Print() },40,010,,,.F.,.T.,.F.,,.F.,,,.F. ) Para utilizar esta classe, no Smart Client, é necessário incluir, no arquivo de configuração do Smart Client (*.INI), a chave BrowserEnabled=1. Em builds superiores a 111010P este componente foi liberado para os sistemas operacionasis Linux® e MacOS®. #include "TOTVS.CH"User Function TIBrowser() DEFINE DIALOG oDlg TITLE "Exemplo TIBrowser" FROM 180,180 TO 550,700 PIXEL oTIBrowser := TIBrowser():New(0,0,260,170,'http://www.totvs.com.br',oDlg ) TButton():New( 172, 002, "Navigate", oDlg,; {|| oTIBrowser:Navigate( "http://www.rm.com.br" ) },40,010,,,.F.,.T.,.F.,,.F.,,,.F. ) TButton():New( 172, 052, "GoHome", oDlg,; {|| oTIBrowser:GoHome() },40,010,,,.F.,.T.,.F.,,.F.,,,.F. ) TButton():New( 172, 102, "Print", oDlg,; {|| oTIBrowser:Print() },40,010,,,.F.,.T.,.F.,,.F.,,,.F. ) ACTIVATE DIALOG oDlg CENTERED Return Exemplo da classe TIBrowser ![]() Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas