Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Classe: TPanelCSS

Cria um objeto do tipo painel que permite receber CSS (Cascading Style Sheet).


TSrvObject -> TControl -> TPanelCSS


New

New

Método contrustor da classe.


TPanelCSS(): New ( [ nRow], [ nCol], [ cText], [ oWnd], [ lCentered], [ lPar6], [ nClrText], [ nClrBack], [ nWidth], [ nHeight], [ lLowered], [ lRaised] ) --> oObjeto


NomeTipoDescriçãoObrigatórioReferência
nRowNuméricoIndica a coordenada vertical em pixels ou caracteres.
nColNuméricoIndica a coordenada horizontal em pixels ou caracteres.
cTextCaracterIndica o texto que será apresentado ao fundo do objeto.
oWndObjetoIndica a janela ou controle visual onde o objeto será criado.
lCenteredLógicoIndica se, verdadeiro (.T.), apresenta o texto do título no centro do objeto; caso contrário, falso (.F.).
lPar6LógicoCompatibilidade.
nClrTextNuméricoIndica a cor do texto do objeto.
nClrBackNuméricoIndica a cor de fundo do objeto.
nWidthNuméricoIndica a largura em pixels do objeto.
nHeightNuméricoIndica a altura em pixels do objeto.
lLoweredLógicoIndica se, verdadeiro (.T.), apresenta o painel rebaixado em relação ao objeto de fundo; caso contrário, falso (.F.).
lRaisedLógicoIndica se, verdadeiro (.T.), apresenta a borda do objeto rebaixada em relação ao objeto de fundo; caso contrário, falso (.F.).
    oObjeto(objeto)
  • Retorna o objeto criado.

oPanel := TPanelCss():New(02,02,"",oDlg,,.F.,.F.,,,080,080,.T.,.F.)

  • A classe TPanelCSS foi criada para ser utilizada no lugar da TPanel, pois a TPanel não suporta aplicação CSS (Cascading Style Sheet).
  • CSS (Cascading Style Sheet) é uma ferramenta utilizada para a construção da aparência de páginas para Web.

#include "TOTVS.CH"User Function TPanelCSS()Local cStyle := "Q3Frame{ border-style:solid; border-width:3px; border-color:#FF0000; background-color:#00FF00 }"  DEFINE DIALOG oDlg TITLE "Exemplo TPanelCSS" FROM 180,180 TO 550,700 PIXEL    oPanel := TPanelCss():New(02,02,"",oDlg,,.F.,.F.,,,080,080,.T.,.F.)    oPanel:setCSS( cStyle )  ACTIVATE DIALOG oDlg CENTERED Return

Exemplo da classe TPanelCSS

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

  • Sem rótulos