Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

Pagetitle

...

Classe TIBrowser

Classe

...

TIBrowser

Cria

...

um

...

objeto

...

do

...

tipo

...

página

...

de

...

internet.

Hierarquia

Construtores

Inclusão de trecho
Classe TIBrowser - Construtores
Classe TIBrowser - Construtores
nopaneltrue

Métodos

Inclusão de trecho
Classe TIBrowser - Métodos
Classe TIBrowser - Métodos
nopaneltrue

Aviso
titleImportante - Objeto descontinuado

Em builds iguais ou superiores a  170117A (Release 25) o componente TIBrowse não é mais suportado, devido a problemas de compatibilidade do Windows 10 com as ferramentas ActiveX utilizadas em sua construção.

Em substituição, a partir da build 170117A é necessário utilizar o componente TWebEngine, baseado no navegador Chromium®.

Aviso
titleImportânte

Para MacOS versão 10.6 ou superior este componente não é mais suportado, por incompatibilidade entre as bibliotecas do Wekbit utilizadas pelo Qt e o Sistema Operacional da Apple.

Observações relativas a builds inferiores à 170117A

  • Para utilizar esta classe é necessário incluir no arquivo de configuração smartclient.ini a chave BrowserEnabled=1.
  • Para o SmartClient HTML também é necessário incluir a chave BrowserEnabled=1.
  • Em ambiente Windows, build 121227P ou superior, quando o Internet Explorer estiver instalado na versão 10 ou superior, ocorre um problema ao abrir o Google Maps, este problema porém é em decorrência de uma incompatibilidade entre as tecnologias de terceiros. Para evitar esse problema com o google maps, altere o registro conforme indicado abaixo para mudar o modo de compatibilidade do Internet Explorer. A classe em questão não tem suporte para Java e/ou JavaScript.
  • Por padrão o objeto utilizará sempre o Internet Explorer no modo de compatibilidade do IE7. A única maneira de mudar isso é alterar o registro do windows (https://msdn.microsoft.com/en-us/library/ee330730.aspx#browser_emulation).

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
#include "TOTVS.CH"
 
MAIN FUNCTION testTIBrowse()
 
    DEFINE DIALOG oDlg TITLE "Exemplo TIBrowser" FROM 180,180 TO 550,700 PIXEL
     
        oTIBrowser 

TSrvObject -> TControl -> TIBrowser

New

Método construtor da classe.

TIBrowser(): New ( [ nRow], [ nCol], [ nWidth], [ nHeight], [ cPage], [ oWnd] ) --> oObjeto

 

NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.  
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.  
nWidthNuméricoIndica a largura em pixels do objeto.  
nHeightNuméricoIndica a altura em pixels do objeto.  
cPageCaracterIndica a URL (Uniform Resource Locator) da página de internet.  
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.  

 

oObjeto
    ()
  • Retorna o objeto criado.
 
oTIBrowser
:= TIBrowser():New(0,0,260,
184
170,
'
 "http://www.totvs.com.br
'
", oDlg )

GoHome

Direciona para a página (URL - Uniform Resource Locator) configurada na construção do objeto.

TIBrowser(): GoHome ( ) -->

TButton():New( 172, 052, "GoHome", oDlg,;

      
{|| oTIBrowser:GoHome()
 
},40,010,,,.F.,.T.,.F.,,.F.,,,.F.
 
)

Navigate

Direciona para uma nova página Web.

TIBrowser(): Navigate ( < cUrl> ) -->

 

NomeTipoDescriçãoObrigatórioReferência
cUrlCaracterIndica a URL (Uniform Resource Locator) da página Web.X 

 

 
TButton():New( 172, 002, "Navigate", oDlg,;
            {|| oTIBrowser:Navigate( "http://
www
tdn.
rm
totvs.com
.br
/display/home/TDN+-+TOTVS+Developer+Network" ) },40,010,,,.F.,.T.,.F.,,.F.,,,.F. )

Print

Abre uma janela para impressão da página.

TIBrowser(): Print ( ) -->

 

         
        TButton():New( 172, 
102
052, "
Print
GoHome", oDlg,;
            {|| oTIBrowser:
Print
GoHome() },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
102, "
Navigate
Print", oDlg,;
            {|| oTIBrowser:
Navigate( "http://www.rm.com.br"
Print() },40,010,,,.F.,.T.,.F.,,.F.,,,.F. )
    
TButton():New( 172, 052, "GoHome", oDlg,; {|| oTIBrowser:GoHome() },40,010,,,.F.,.T.,.F.,,.F.,,,.F. )
        
        // Disponível apenas em versões superiores a 7.00.170117A - 17.2.0.2
        TButton():New( 172, 
102
152, "
Print
GetURL", oDlg,;
            {|| MsgAlert(oTIBrowser:
Print
GetURL()) },40,010,,,.F.,.T.,.F.,,.F.,,,.F. )
             
    ACTIVATE DIALOG oDlg CENTERED
 
Return
Exemplo da classe TIBrowser

Resultado do Exemplo

Image Modified

Abrangência

Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

...