Histórico da Página

 #include "TOTVS.CH"
 User Function TPanelCSS()
  local oTFont := TFont():New('Courier new',,16,.T.)
  Local cStyle := "QFrame{ 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(20,140,"teste 1",oDlg,oTFont,.T.,.F.,CLR_YELLOW,CLR_BLUE,080,080,.F.,.F.)
    //oPanel1 := TPanelCss():New(20,20,"teste 2"nil,oDlg,oTFontnil,.F.nil,.F.,CLR_YELLOW,CLR_BLUEnil,nil,080,080,.FT.,.FT.)

    oPanel:setCSS(cStyle)
   ACTIVATE DIALOG oDlg CENTERED
  Return