TSrvObject:SetCSS

Aplica estilo no objeto utilizando o CSS (Cascading Style Sheets)

Sintaxe

SetCSS( < cCSS > )

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
cCSS	caractere	Indica o texto com formato CSS para o objeto.	X

Observações

O guia de estilo é de propriedade da Qt Company, e pode ser consultado no link: http://doc.qt.io/qt-4.8/stylesheet-examples.html.

Para a aplicação do estilo é necessário associar o componente ADVPL ao seu equivalente Qt, conforme tabela abaixo:

Tabela de componentes (De/Para). Válida para SmartClient 131227A ou superior.

Componente ADVPL	Equivalente Qt
TButton SButton TBrowseButton TBtnBmp TBtnBmp2 THButton	QPushButton
TCBrowse BrGetDDb MsBrGetDBase MsSelBr TSBrowse TWBrowse VCBrowse	QTableWidget
TCColumn	QTableWidgetItem
TCheckBox	QCheckBox
TComboBox	QComboBox
TFolder	QTabBar
TGet	QLineEdit
TGrid	QTableView
TGroup	QGroupBox
TListBox	QListWidget
TMeter	QProgressBar
TMsgBar	QStatusBar
TMsgItem	QLabel
TMultiGet	QTextEdit
TPanel	QLabel
TRadMenu	QRadioButton
TSay	QLabel
TScrollArea TScrollBox	QScrollArea
TSimpleEditor	QTextEdit
TSlider	QSlider
TSpinBox	QSpinBox
TSplitter	QSplitter
TToolBox	QToolBox
TTree	QTreeWidget

Exemplos

oButton1 := TButton():New( 002, 002, "Botão 01",oDlg,{|| alert("Botão 01") }, 40,10,,,.F.,.T.,.F.,,.F.,,,.F. )
oButton1:SetCss("QPushButton:pressed { background-color: qlineargradient(x1: 0, y1: 0, x2: 0, y2: 1, stop: 0 #dadbde, stop: 1 #f6f7fa); }")

Árvore de páginas