Classe de painel estático.
Hierarquia
tSrvObject -> tControl -> tPanel
Descrição
Utilize a classe tPanel quando desejar criar um painel estático, onde podem ser criados outros controles com o objetivo de organizar ou agrupar componentes visuais.
Métodos
New
Descrição
Construtor da classe.
Sintaxe
New([anRow], [anCol], [acText], [aoWnd], [aoFont], [alCentered], [lPar6], [anClrText], [anClrBack], [anWidth], [anHeight], [alLowered], [alRaised])
Parâmetros
| anRow | Numérico, opcional. Coordenada vertical em pixels. |
| anCol | Numérico, opcional. Coordenada horizontal em pixels. |
| acText | Caractere, opcional. Texto a ser exibido ao fundo. |
| aoWnd | Objeto, opcional. Janela ou controle onde será criado o objeto. |
| alCentered | Lógico, opcional. Se .T. exibe o texto de título ao centro do controle. |
| lPar6 | Reservado. |
| anClrText | Numérico, opcional. Cor do texto do controle. |
| anClrBack | Numérico, opcional. Cor do fundo do controle. |
| anWidth | Numérico, opcional. Largura do controle em pixels. |
| anHeight | Numérico, opcional. Altura do controle em pixels. |
alLowered | Lógico, opcional. Se .T. exibe o painel rebaixado em relação ao controle de fundo. |
| alRaised | Lógico, opcional. Se .T. exibe a borda do controle rebaixada em relação ao controle de fundo. |
Retorno
O objeto construído.
Exemplo
#include “protheus.ch”
User Function Teste()
Local oDlg, oPanel, oBtn1, oBtn2
DEFINE MSDIALOG oDlg FROM 0,0 TO 400,400 PIXEL TITLE “My test”
// cria o painel
oPanel:= tPanel():New(10,10,””,oDlg,,,,,CLR_BLUE,100,100)
// cria botão sobre o painel
@ 10,10 BUTTON oBtn1 PROMPT “hide” OF oPanel ACTION oPanel:Hide()
// cria botão fora o painel
@ 200,10 BUTTON oBtn2 PROMPT “show” OF oDlg ACTION oPanel:Show()
ACTIVATE MSDIALOG oDlg CENTERED
Return