Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: binary and image files updated

...

Portuguese

Pagetitle
TIBrowser
TIBrowser

Classe: TIBrowser

Cria um objeto do tipo página de internet.


TSrvObject -> TControl -> TIBrowser


New

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,'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.rm.com.br" ) },40,010,,,.F.,.T.,.F.,,.F.,,,.F. )

Print

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
Image Removed Image Added

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