Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
| Pagetitle |
|---|
...
...
|
...
|
Cria
...
um
...
objeto
...
do
...
tipo
...
painel
...
com
...
barra
...
de
...
rolagem
...
(Scroll).
Hierarquia
...
...
- TScrollArea
Construtores
New
Método construtor da classe.
TScrollArea(): New ( [ oWnd], [ nTop], [ nLeft], [ nHeight], [ nWidth], [ alVertical], [ alHorizontal], [ uParam8] ) --> xObjeto
| Nome | Tipo | Descrição | Obrigatório | Referência |
| oWnd | Objeto | Indica a janela ou controle visual onde o objeto será criado. | ||
| nTop | Numérico | Indica a coordenada vertical em pixels. | ||
| nLeft | Numérico | Indica a coordenada horizontal em pixels. | ||
| nHeight | Numérico | Indica a altura em pixels do objeto. | ||
| nWidth | Numérico | Indica a largura em pixels do objeto. | ||
| alVertical | Lógico | Indica se .T. será habilitada a barra de rolagem vertical | ||
| alHorizontal | Lógico | Indica se .T. será habilitada a barra de rolagem horizontal | ||
| uParam8 | Lógico | Compatibilidade |
xObjeto
- ()
- Retorna o objeto criado.
oScroll := TScrollArea():New(oDlg,01,01,100,100,.T.,.T.,.T.)SetFrame
Define o objeto que será apresentado na área.
TScrollArea(): SetFrame ( [ oObjeto] ) -->
| Nome | Tipo | Descrição | Obrigatório | Referência |
| oObjeto | Objeto | Indica o objeto que será apresentado na área. |
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Propriedades
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Métodos
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
oScroll := TScrollArea():New(oDlg,01,01,100,100,.T.,.T.,.T.)
oScroll:Align := CONTROL_ALIGN_ALLCLIENT
@ 000,000 MSPANEL oPanel OF oScroll SIZE 1000,1000 COLOR CLR_HRED
TButton():New( 10,010,"Botão Teste",oPanel,{||},40,010,,,.F.,.T.,.F.,,.F.,,,.F. )
TButton():New( 10,230,"Botão Teste",oPanel,{||},40,010,,,.F.,.T.,.F.,,.F.,,,.F. )
oScroll:SetFrame( oPanel )
| Propriedade | Descrição | Tipo |
| lTracking | Indica se habilita (.T.)/desabilita (.F.) a possibilidade de arrasto do componente container. | Lógico |
Observações
- A barra de rolagem será apresentada
...
- somente se o conteúdo
...
- ultrapassar a área definida para o painel.
...
- A propriedade lTracking está disponível
...
- somente em builds superiores a 7.00.111010P.
Exemplos
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#Include "TOTVS.ch" User function Apoiou_TScrollArea DEFINE DIALOG oDlg TITLE "" FROM 180,180 TO 550,700 PIXEL// Cria objeto Scroll oScroll := TScrollArea():New(oDlg,01,01,100,100,.T.,.T.,.T.) ) oScroll:Align := CONTROL_ALIGN_ALLCLIENT // Cria painel @ 000,000 MSPANEL oPanel OF oScroll SIZE 1000,1000 COLOR CLR_HRED // Define objeto painel como filho do scroll oScroll:SetFrame( oPanel ) // Insere objetos no painel apenas para visualização TButton():New( 10,010,"Botão Teste",oPanel,{||},40,010,,,.F.,.T.,.F.,,.F.,,,.F.)) TButton():New( 10,230,"Botão Teste",oPanel,{||},40,010,,,.F.,.T.,.F.,,.F.,,,.F.)) ACTIVATE DIALOG oDlg CENTEREDReturnExemplo da classe TScrollArea() |
Resultado do Exemplo
Abrangência
Protheus 10, TOTVS Application Server 10
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas