Função: AddCSSRule
Cria uma lista de regras CSS - Cascading Style Sheets para serem aplicadas aos objetos no momento de sua criação.
AddCSSRule ( < cObjeto>, < cRegraCSS> ) --> Nil
| Nome | Tipo | Descrição | Obrigatório | Referência |
| cObjeto | Caracter | Indica o nome do objeto que receberá a regra. | X | |
| cRegraCSS | Caracter | Indica a CSS que será aplicada. | X |
Nil (Nulo)
User Function Exemplo()Local cMensagem := ""Local oDialog := NilLocal 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
Exemplo da função AddCSSRule()
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas