Como Coloco dos lineas en titulo de xbrowse

[ruben Dario]

Buen dia como coloco dos lineas en titulo de browse, actualmente lo hago asi y no hace el saldo de linea. Lo hago asi.
oBrw:aCols[ 5 ]:cHeader := "Doc.Trans"+CHR(10)+"Anulacion"

Code: Select all  Expand view  RUN

     oBrw := TXBrowse():New( oDlg28 )     
             oBrw:CreateFromResource( 4002 )  //-----------------------------> Chamada ao Resource Browse.
             par_broArra("3",oBrw,aContl[20],0,oRecordSet[nRecordSet])

             oBrw:SetArray( aArray, .T. )
             //     
        oBrw:bKeyDown:={|nKey| IIF(nKey=VK_RETURN.OR.(aContl[1]+aContl[2])>0,;
                             (Vble_enrt(),lAtvBtn:=.T.,vTarefa:= "A"),.t. ) }
             oBrw:bLDblClick := { || IIF(aContl[1]+aContl[2]>0,(Vble_enrt(),lAtvBtn:=.T.,vTarefa:= "A"),.t.) }
    //
             *****--- Colunas ---*****     
//           oBrw:aColSizes   :={5,20,80,50,50,50,30}
//           oBrw:SetSize( 20, 80 )
             oBrw:aCols[ 1 ]:AddResource("CUT")
        oBrw:aCols[ 1 ]:cHeader := "St"
             oBrw:aCols[ 1 ]:nDataStrAlign := AL_RIGHT
             oBrw:aCols[ 1 ]:nHeadStrAlign := AL_CENTER
             oBrw:aCols[ 1 ]:nWidth := 25
             oBrw:aCols[ 1 ]:bBmpData  := { || iif(aArray[ oBrw:nArrayAt, 1 ]="*", 1,0) }

       //
             oBrw:aCols[ 2 ]:cHeader := "Codigo" 
             oBrw:aCols[ 2 ]:nDataStrAlign := AL_LEFT
             oBrw:aCols[ 2 ]:nHeadStrAlign := AL_LEFT 
             oBrw:aCols[ 2 ]:nWidth := 60

...
             //
             //
             oBrw:aCols[ 5 ]:cHeader := "Doc.Trans"+CHR(10)+"Anulacion"
            oBrw:aCols[ 5 ]:nDataStrAlign := AL_LEFT
             oBrw:aCols[ 5 ]:nHeadStrAlign := AL_LEFT
             oBrw:aCols[ 5 ]:nWidth := 100

             //
             oBrw:aCols[ 6 ]:cHeader := "Cuenta.CxP"
        oBrw:aCols[ 6 ]:nDataStrAlign := AL_LEFT
             oBrw:aCols[ 6 ]:nHeadStrAlign := AL_LEFT
             oBrw:aCols[ 6 ]:nWidth := 100
             //
             oBrw:aCols[ 7 ]:AddResource("CHECK_SI")
             oBrw:aCols[ 7 ]:AddResource("CHECK_NO")
             oBrw:aCols[ 7 ]:cHeader := "Status"
        oBrw:aCols[ 7 ]:nDataStrAlign := AL_LEFT 
             oBrw:aCols[ 7 ]:nHeadStrAlign := AL_LEFT
             oBrw:aCols[ 7 ]:nWidth := 50

             oBrw:aCols[ 7 ]:bBmpData  := { || iif(aArray[ oBrw:nArrayAt, 7 ], 1, 2) }
             oBrw:aCols[ 7 ]:bStrData  := { || iif(aArray[ oBrw:nArrayAt, 7 ],"Si","No") }
             //
             oBrw:aCols[ 8 ]:cHeader := " "
        oBrw:aCols[ 8 ]:nDataStrAlign := AL_LEFT
             oBrw:aCols[ 8 ]:nHeadStrAlign := AL_LEFT
             oBrw:aCols[ 8 ]:nWidth := 10

             //
              FOR nFor := 1 to Len( aCols )
                 oBrw:aCols[ nFor ]:lAllowSizing := .F.                     
                 oBrw:aCols[ nFor ]:bRClickHeader = { || nil }                               
             NEXT
   ACTIVATE DIALOG oDlg28 CENTERED VALID (lExit) ON INIT (ShowMenu(MatValid,@aContl,oBar12,oDlg28);


[Ruben D. Fernandez]

Ruben DArio:

Asi lo hago:
oCol:cHeader:= "Número Usuario"+CHR(10)+"Nombre Usuario"

Saludos

Ruben Fernandez

[Daniel Garcia-Gil]

oBrw:nHeaderLines = n
donde "n" es el numero de lineas que desees

Code: Select all  Expand view  RUN

oBrw:aCols[ 5 ]:cHeader := "Doc.Trans"+CRLF+"Anulacion"