Classe: TIBrowser
Cria um objeto do tipo página de internet.
TSrvObject -> TControl -> TIBrowser
New
Método construtor da classe.
TIBrowser(): New ( [ nRow], [ nCol], [ nWidth], [ nHeight], [ cPage], [ oWnd] ) --> oObjeto
| Nome | Tipo | Descrição | Obrigatório | Referência |
| nRow | Numérico | Indica a coordenada vertical em pixels ou caracteres. | ||
| nCol | Numérico | Indica a coordenada horizontal em pixels ou caracteres. | ||
| nWidth | Numérico | Indica a largura em pixels do objeto. | ||
| nHeight | Numérico | Indica a altura em pixels do objeto. | ||
| cPage | Caracter | Indica a URL (Uniform Resource Locator) da página de internet. | ||
| oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. |
oObjeto
- ()
- Retorna o objeto criado.
oTIBrowser:= TIBrowser():New(0,0,260,184,'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> ) -->
| Nome | Tipo | Descrição | Obrigatório | Referência |
| cUrl | Caracter | Indica a URL (Uniform Resource Locator) da página Web. | X |
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 SmartClient, é 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®.
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, estamos aguardando uma solução por parte destes softwares externos.
A classe em questão não tem suporte para Java e/ou JavaScript.
Observações
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®.
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, estamos aguardando uma solução por parte destes softwares externos.
A função não tem suporte para Java e/ou JavaScript
Exemplo
#include "TOTVS.CH"
MAIN FUNCTION testTIBrowse()
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