TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Adriana Panseri Santos

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Rogerio Ribeiro da Cruz

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
AddCSSRule
AddCSSRule

Função: AddCSSRule

Cria uma lista de regras CSS - Cascading Style Sheets para serem aplicadas aos objetos no momento de sua criação.
Sintaxe

AddCSSRule ( < cObjeto>, < cRegraCSS> ) --> Nil

Parâmetros/Elementos

 

NomeTipoDescriçãoObrigatórioReferência
cObjetoCaracterIndica o nome do objeto que receberá a regra.X 
cRegraCSSCaracterIndica a CSS que será aplicada.X 

 

Retorno
Nil (Nulo)
Exemplos

 

Bloco de código
themeEclipse
languagecpp
titleExemplo
linenumberstrue
#INCLUDE "TOTVS.CH"

User Function Exemplo()
	Local cMensagem := ""
	Local oDialog :=
NilLocal
Nil
	Local oMsgBar := Nil
	
	//+----------------------------------------------------------------------------+
	//|Cria o diálogo para exemplificar o uso do AddCSSRule                        |
	//+----------------------------------------------------------------------------+

	oDialog := MsDialog():Create()

	oDialog:cTitle  := "Exemplo de AddCSSRule"

	oDialog:nWidth  := 800

	oDialog:nHeight := 600

	
	AddCSSRule("TMsgBar", "QStatusBar{background-color:#000000} QLabel{color:#FFFFFF}")

	
	cMensagem := "Message bar - background-color:#000000 color:#FFFFFF"

	
	oMsgBar := TMsgBar():New(oDialog, cMensagem, .F., .F., .F., .F., , , , .F., )
	
	//+----------------------------------------------------------------------------+
	//|Apresenta o diálogo                                                         |
	//+----------------------------------------------------------------------------+

	oDialog:Activate()
Return

 


Preview
Exemplo da função AddCSSRule()
Abrangência
Protheus 10 , TOTVS Application Server 10 , ByYou Application Server