TOTVSTEC

Árvore de páginas

Cria um objeto do tipo painel com barra de rolagem (Scroll).

Hierarquia

Construtores

Propriedades

Métodos

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

 #Include "TOTVS.ch"
 User function u_TScrollArea

  DEFINE DIALOG oDlg TITLE "" FROM 180,180 TO 550,700 PIXEL

   // Cria objeto Scroll
   oScroll := TScrollArea():New(oDlg,01,01,100,100)
   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 CENTERED
 Return

Resultado do Exemplo

Abrangência

Protheus 10, TOTVS Application Server 10

  • Sem rótulos