FiveTech Software tech support forums

... := 20 :nFooterLines := 2 :nStretchCol := 3 :lAllowColHiding := .F. :lAllowColSwapping := .F. :lDisplayZeros := .F. :lRecordSelector := .F. :lHScroll := .F. :l2007 := .F. :lFooter := .T. :lDrawBorder := .T. :lAllowColReGroup := .T. :lColDividerComplete := .T. :lIncrFilter := .F. :nStretchCol ...

... := .f. // la division de renglones es hasta donde hay datos // anulo el doble color d los registros oBrw:lContrastClr := .f. oBrw:lHScroll := .f. oBrw:nHeadStrAligns := AL_CENTER // alinea al centro las cabeceras de columnas oBrw:bClrStd := {|| { iif(!empty(Neteo->FechaPago),CLR_GREEN,CLR_RED),CLR_WHITE ...

But they are both standard when we setup the xbrowse ? Did you turn off the horizontal ?

with

oBrw:lHScroll := .T. or .f. we can put them on and off.

or in the

With object oBrw
...
...
:lHScroll := .T.
END

By change some of the Xbrowse code to show ?

Hey Rick,

Do you want a extra hor.scroll bar ? Not seen on the forum yet.

For the standart :

oBrw:nRowHeight := 40 // and use a larger font
oBrw:lHScroll := .T.

but I think you are looking for something else ...

... <oWnd> ] ; [ SIZE <nWidth>, <nHeight> ] ; [ FONT <oFont> ] ; [ <pixel: PIXEL> ] ; [ MESSAGE <cMsg> ] ; [ <lHScroll: HSCROLL> ] ; [ <readonly: READONLY, NO MODIFY> ] ; [ WHEN <uWhen> ] ; [ VALID <uValid> ] ; [ ON CHANGE <uChange> ...

... 40, 220 ; ARRAY aData ; SIZE -5,-100 PIXEL STYLE FLAT NOBORDER WITH OBJECT oBrw WITH OBJECT oBrw:aCols[1] :cEditPicture := "###gg" END :lHScroll := .f. :CreateFromCode() END

... the same must be made in the presence of Horizontal scrolling but I not found the part where draw the box when there ::lHscroll is true better can be oBrw:lVScroll := .t. oBrw:lhScroll := .t.  if ::lDrawBorder     If ::lVScroll         ::Box( 0, 0, ::nHeight - 1, ...

... := CLR_BLACK                     END but the border is drawed only on left and up and down of the xbrowse If I make oBrw:lVScroll := .f. oBrw:lhScroll := .f. the border is painted good but I need to use Vscroll https://i.postimg.cc/1zwPXZ0g/lll.png I think we need to tell the ...

... } } // para barra de linea selecc cuando el control no tiene el foco oBrw:l2007:=.T. oBrw:lFooter := (.T.) // Sí queremos línea de footer oBrw:lHScroll := (.T.) // Quitamos el scroll horizontal oBrw:lVScroll := (.T.) // Quitamos el scroll horizontal oBrw:nStretchCol := STRETCHCOL_WIDEST oBrw:bLDblClick ...

... } } // para barra de linea selecc cuando el control no tiene el foco oBrw:l2007:=.T. oBrw:lFooter := (.T.) // Sí queremos línea de footer oBrw:lHScroll := (.T.) // Quitamos el scroll horizontal oBrw:lVScroll := (.T.) // Quitamos el scroll horizontal oBrw:nStretchCol := STRETCHCOL_WIDEST oBrw:bLDblClick ...

... use customer XBROWSER "CUSTOMER" COLUMNS "STATE", "AGE", "MARRIED", "SALARY" SETUP ( ; oBrw:lHScroll := .f.,; oBrw:lVScroll := .f.,; oBrw:lToolbar := .f.,; // not ok oBrw:lFullGridClr := .t.,; oBrw:lIncrFilter := .t.,; oBrw:lSeekWild := .t.,; ...

... "Interna" ; SIZES 230, 230, 230, 50 ; ALIAS AliasNCA autosort FASTEDIT LINES CELL font ofontBR // BACKGROUND aGrad HORIZONTAL oNoConfAnt:lHScroll := ( .f. ) If !Empty( oNoConfAnt:aCols ); oNoConfAnt:Cargos := nil; endif colorxbrw( oNoConfAnt, .f. ) WITH OBJECT oNoConfAnt:NoConf :bOnPostEdit ...

... 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 // anulo el doble color d los registros oBrw:lContrastClr := .f. // quitar barra horizontal oBrw:lHScroll := .F. oBrw:aCols[ 4 ]:cDataType := "F" oBrw:aCols[ 2 ]:nWidth := 20 oBrw:bKeyDown:={|nKey,nFlag|iif(veo(@nApu,@oBrw,aBotones,nKey),eval(aBotones[nApu,4]),NIL)} ...

Willi Quintana wrote:Amigos b uenos dias.
Solucione el tema con ésta clausula:, los scroll vertical y horizontal se señalan en el control... el los prg no funcionan, pero al colocar la clausula indicada. ahora funciona bien...

oBrw:lHScroll := (.f.)

probare, gracias

Amigos b uenos dias.
Solucione el tema con ésta clausula:, los scroll vertical y horizontal se señalan en el control... el los prg no funcionan, pero al colocar la clausula indicada. ahora funciona bien...

oBrw:lHScroll := (.f.)