Á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 TScrollBox

Classe

...

TScrollBox

Cria

...

um

...

objeto

...

do

...

tipo

...

painel

...

com

...

barra

...

de

...

rolagem

...

(Scroll).

Hierarquia

...

...

    • TScrollBox

Construtores

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

Métodos

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

Exemplos

    oObjeto(objeto)
  • Retorna o objeto criado.
oScr := TScrollBox():Create(oDlg,01,01,92,260,.T.,.T.,.T.)
New

New

Método construtor da classe.

TScrollBox(): New ( [ oWnd], [ nTop], [ nLeft], [ nHeight], [ nWidth], [ lVertical], [ lHorizontal], [ lBorder] ) --> oObjeto

    oObjeto(objeto)
  • Retorna o objeto criado.
oScr := TScrollBox():New(oDlg,01,01,92,260,.T.,.T.,.T.)

Reset

Retorna a barra de rolagem para a posição inicial à esquerda e ao topo.

TScrollBox(): Reset ( ) -->

oScr:Reset()
#include "TOTVS.CH"User Function TScrollBox() DEFINE
 DIALOG oDlg TITLE "Exemplo TScrollBox" FROM 180,180 TO 550,700 PIXEL

    // Usando o método New
oScr1

    oScr1 := TScrollBox():New(oDlg,01,01,92,260,.T.,.T.,.T.)


    // Cria objetos para teste do Scroll
    oFont 
oFont
:= TFont():New('Courier new',,-22,.T.)
oSay1


    oSay1:= TSay():New(01, 01,
{||'Texto para exibição '+; 'Texto para exibição Texto para exibição'},
 bTexto, oScr1,,oFont,,;

                        ,,.T.,CLR_RED,CLR_WHITE,400,20)
oSay2


    oSay2:= TSay():New(01,01,
{||'Texto para exibição '+; 'Texto para exibição Texto para exibição'},
 bTexto, oScr1,,oFont,,;

                       ,,.T.,CLR_RED,CLR_WHITE,400,20)


    // Usando o método Create
oScr2

    oScr2 := TScrollBox():Create(oDlg,93,01,92,260,.T.,.T.,.T.)
oSay3


    oSay3:= TSay():New(01, 01,
{||'Texto para exibição '+; 'Texto para exibição Texto para exibição'},
 bTexto, oScr2,,oFont,,;

                        ,,.T.,CLR_RED,CLR_WHITE,400,20)
oSay4


    oSay4:= TSay():New(01, 01,
{||'Texto para exibição '+; 'Texto para exibição Texto para exibição'},
 bTexto, oScr2,,oFont,,;

                        ,,.T.,CLR_RED,CLR_WHITE,400,20)
ACTIVATE

  ACTIVATE DIALOG oDlg CENTERED
ReturnExemplo da classe TScrollBox
Image Removed

RETURN
Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
#INCLUDE "TOTVS.CH"
MAIN FUNCTION u_TScrollBox()
  local bTexto := {|| 'Texto para exibição '+;
                      'Texto para exibição '+;
                      'Texto para exibição'}

  DEFINE

Create

Método construtor da classe.

TScrollBox(): Create ( [ oWnd], [ nTop], [ nLeft], [ nHeight], [ nWidth], [ lVertical], [ lHorizontal], [ lBorder] ) --> oObjeto

NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.nTopNuméricoIndica a coordenada vertical em pixels.nLeftNuméricoIndica a coordenada horizontal em pixels.nHeightNuméricoIndica a altura em pixels do objeto.nWidthNuméricoIndica a largura em pixels do objeto.lVerticalLógicoIndica se, verdadeiro (.T.), a barra de rolagem será apresentada; caso contrário, falso (.F.).lHorizontalLógicoIndica se, verdadeiro (.T.), a barra de rolagem horizontal será apresentada; caso contrário, falso (.F.).lBorderLógicoIndica se, verdadeiro (.T.), a borda do objeto será apresentada; caso contrário, falso (.F.).
NomeTipoDescriçãoObrigatórioReferência
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.nTopNuméricoIndica a coordenada vertical em pixels.nLeftNuméricoIndica a coordenada horizontal em pixels.nHeightNuméricoIndica a altura em pixels do objeto.nWidthNuméricoIndica a largura em pixels do objeto.lVerticalLógicoIndica se, verdadeiro (.T.), a barra de rolagem será apresentada; caso contrário, falso (.F.).lHorizontalLógicoIndica se, verdadeiro (.T.), a barra de rolagem horizontal será apresentada; caso contrário, falso (.F.).lBorderLógicoIndica se, verdadeiro (.T.), a borda do objeto será apresentada; caso contrário, falso (.F.).

Resultado do Exemplo

Image Added

Abrangência

Advanced Protheus 6.09, Advanced Protheus 7.10, Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server