FiveTech Software tech support forums

... horizontal bar disappears but the external line in xbrowse change, they look deep, if I don't change the style the bar doesn't disappear with oBrw:lHScroll: = .F. What to do to resolve this? Thanks. No changing style https://i.ibb.co/rFWKLb7/x-Browser1.jpg With 0x50D00000 https://i.ibb.co/GHmW01B/x-Browser2.jpg ...

... oDlg ; oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 // anulo el doble color d los registros oBrw:lContrastClr := .f. oBrw:lHScroll := .f. oBrw:nHeadStrAligns := AL_CENTER // alinea al centro las cabeceras de columnas // defino colores de los registros en el browse oBrw:bClrStd ...

... MDICHILD OF oWnd FROM 1, 1 To 35, 118 TITLE "Catalodo de Inventario" DEFINE BUTTONBAR oBar _3D OF oWndChild SIZE 42, 42 TWBrowse():lHScroll:= .F. @ 3.5, .5 LISTBOX oLbx FIELDS Transform(oRecordSet:Fields("Codigo"):value,"999999"), oRecordSet:Fields("Descripcion"):value,oRecordSet:Fields("Linea"):value; ...

... := eFont :nFreeze := 3 :nStretchCol := 3 :lAllowColHiding := .F. :lAllowColSwapping := .F. :lDisplayZeros := .F. :lRecordSelector := .F. :lHScroll := .F. :l2007 := .F. :lFooter := .T. :lDrawBorder := .T. :lAllowColReGroup := .T. :lColDividerComplete := .T. :SetGroupHeader( 'Jornada', 5,6, ...

... ), oBrw:RefreshCurrent(), ; oBrw:MakeTotals(), oBrw:RefreshFooters(), oDlg:Update() } END WITH OBJECT oBrw :lFlatStyle := .t. :nStretchCol := 2 :lHScroll := .f. :bOnRefresh := { || oDlg:Update() } // BrwRecSel( oBrw, "KEYNO" ) // :MakeTotals() :CreateFromCode() END @ nHt - 139 + 45, ...

... :lIncrFilter := .t. :bOnSort := { |b,oCol| oBrw:Seek( "" ), ; oBrw:cFilterFld := oCol:cExpr, ; oBrw:SetFocus() } :lDrawBorder := .t. :lHScroll := .f. :SetMultiSelectCol() :oSeek := oGet :CreateFromCode() END

... := 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 ...