rao - xbrowse with nMarqueeStyle 7

[carlos vargas]

Rao, using the mouse scrolling in a browse with nMarqueeStyle 7 (win7 bar)
the border of cursorof row move correct, but the color background no.

Code: Select all  Expand view

  REDEFINE XBROWSE oBrwD ALIAS "EMPL_DOC" ;
      ID 104 OF oDlgD ;
      FONT oFontD

   ADD TO oBrwD DATA EMPL_DOC->NOMBRE+CRLF+EMPL_DOC->DESCRIPCIO  TITLE "Nombre de archivo"+FINL+"Descripción" SIZE 350
   ADD TO oBrwD DATA EMPL_DOC->FECHA                             TITLE "Fecha"                                SIZE 070 LEFT

   WITH OBJECT oBrwD
      :MyConfig()
      :aCols[ 01 ]:bPaintText := { |oCol, hDC, cText, aCoord| XColDrawText( oCol, hDC, cText, aCoord ) }
      :lHScroll      := FALSE
      :nHeaderHeight := 36
      :nFreeze       := 2
      :nDataLines    := 2.5
      :nHeaderLines  := 2
      :nMarqueeStyle := 7
      :bLDblClick    := {|| IIf( !EMPL_DOC->( Eof() ), DocuE_Visualizar(), NIL ) }
      :bDropFiles    := {|nRow, nCol, aFiles| DocuE_DragDropFile( aFiles ) }
   END

[nageswaragunupudi]

If you are not using a very old version of FWH. it is not necessary to use oCol:bPaintText for display of Win7bars. It is enough if you specify the MarqueeStyle.

bPaintText was recommended before we included painting of win7bars within xbrowse.

Please try removing bPaintText and see if your version supports it. Also please let us know the version you are using. If you still experience any problem, please let us know.