#define BRWSECCIONES;
"SELECT " +;
"a.id as c0, "+;
"a.seccion as c1, " +;
"a.habilitado as c2 "+;
"FROM tbsecciones as a "+;
"WHERE a.habilitado = '1' ORDER BY a.seccion"
- Code: Select all Expand view
::oBrw := TXBROWSE():new( oDlg )
::oBrw:setdolphin( ::oQry, .T., .F., { "c0", "c1" } )
WITH OBJECT ::oBrw
:nMarqueeStyle := 5
:bClrStd := { || IF( ::oBrw:KeyNo() % 2 == 0, ;
{ CLR_BLACK, RGB( 255, 255, 255 ) }, ;
{ CLR_BLACK, RGB( 214, 255, 215 ) } ) }
:bClrSel := { || { CLR_BLACK, RGB( 214, 255, 215 ) } }
:lKinetic := .F.
:ltransparent := .F.
:nRowHeight := 22
:lHScroll := ( .T. )
:lRecordSelector := .F.
:lAllowColSwapping := .F.
:lColDividerComplete := .F.
:nRowDividerStyle := 4
:nStretchCol := STRETCHCOL_LAST
:nColDividerStyle := 4
WITH OBJECT :aCols[ 2 ]
:cHeader := "Secciones"
:nHeadStrAlign := AL_CENTER
...
END WITH
::oBrw:aCols[ 01 ]:hide()
::oBrw:aCols[ 02 ]:setorder()
Ahora ya no me aparece el triangulito en el encabezado y tampoco puedo ordenar de mayor a menor y tampoco puedo hacer la busqueda cuando voy presionando las teclas.
