FiveTech Software tech support forums

... FOKUS}
else
aColors := { CLR_BLACK,CLR_WHITE }
endif
endif
Return aColors

and then this for xbrowse
WITH OBJECT oBrw
:MakeTotals()
:lFooter := .T.
:l2007 := .f.
:lRecordSelector := .F.
:nMarqueeStyle := MARQSTYLE_HIGHLROW
:bClrStd := { || MyColors( oBrw ) } //{ || { CLR_GREEN, CLR ...

... on row selection, especially in multi-select mode. Select() is the core method, with others being convenience wrappers.

SetMultiSelectCol( uCol, lFooter ): Enables multi-selection and links it to a specific column, triggering the use of the selection methods.

Analogy: These are like the car's ...

... Adds read-only checkboxes with custom bitmaps and prompt.
content_copy
download
Use code with caution.
Harbour

99. SetMultiSelectCol( uCol, lFooter )

Description: Designates a specific column to function as a multi-select column, enabling row selection using checkboxes in that column ...

... Enables editable checkboxes in the first column (if logical).
content_copy
download
Use code with caution.
Harbour

57. SetMultiSelectCol( uCol, lFooter )

Description: Sets a column as the multi-select column, enabling row selection using checkboxes.

Parameters:

uCol: OBJECT or NUMERIC ...

... nColorPen := CLR_HGRAY
:lFullGrid := .T.
:nStretchCol := STRETCHCOL_LAST
:bClrHeader := { || { CLR_WHITE, oLamcla:nClrBrwCab, CLR_HGRAY } }
:lFooter := .t.
:nFooterLines := 1
:nFooterHeight := 25
:nFreeze := 4
//:bRClicked := {|nRow, nCol | if(!::lNueva,::mRegNomi( nRow,nCol,oBrw, cbModi ...

... 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, oFont )
:SetGroupHeader ...

... 3

:lAllowColHiding := .F.
:lAllowColSwapping := .F.
:lDisplayZeros := .F.
:lRecordSelector := .F.
:lHScroll := .F.
:l2007 := .F.
:lFooter := .T.
:lDrawBorder := .T.
:lAllowColReGroup := .T.
:lColDividerComplete := .T.
:lIncrFilter := .F.

:nStretchCol := STRETCHCOL_WIDEST ...

... BrwHeight(), ::BrwWidth(), IfNil( ::nClrBorder, ::hColPen ) )
endif
endif



https://i.postimg.cc/YSJR5zRJ/ok-2.png

it run also with oBrw:lfooter := .t.

My Advice
the best modification is to draw the border after the horizontal and vertical scroll and not before as I have solved ...

... bClrSel := {|| { nRGB(000,000,000), nRGB(128,255,128) } } // 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 ...

... 6

:lAllowColHiding := .F.
:lAllowColSwapping := .F.
:lDisplayZeros := .F.
:lRecordSelector := .F.
:lHScroll := .F.
:l2007 := .F.
:lFooter := .T.
:lDrawBorder := .t.
:lAllowColReGroup := .T.
:lColDividerComplete := .T.

:nRowDividerStyle :=LINESTYLE_BLACK

:bClrHeader ...

... Self en lugar de NIL, lo que facilita la llamada a varios métodos en
una sola línea de código.

- Nuevo método SetMultiSelectCol( [uCol], [lFooter] )
Si se llama sin parámetros o uCol como NIL, se inserta una nueva columna como primera columna y se establece como
columna multi-selección ...

... oBrw[I]:nHeaderLines := 2
oBrw[I]:lHScroll := .f.
oBrw[I]:lVScroll := .F.
oBrw[I]:bPastEof := {|| NewReg(aData,oBrw,oFld:nOption) }

oBrw[I]:lFooter := .t.
oBrw[I]:nFooterHeight := 35 // Altura del footer
oBrw[I]:lIncrFilter := .T.
oBrw[I]:lSeekWild := .T.
oBrw[I]:nColSel := 1

For n := 1 ...

xbrowser(aGroepen) FASTEDIT AUTOSORT SHOW RECID Title "Downloadlijst voor de groepen"

Xbrowse

WITH OBJECT oBrw
:lEditMode := .T.
:lFooter := .t.
:bRecSelHeader := { || "" }
:bRecSelData := { |o| o:KeyNo }
:bRecSelFooter := { |o| o:nLen }
RecSelFont := oFont3 // optional
:nRecSelWidth ...

... now return Self instead of nil, making
it easy to call multiple methods in a single line of code.

- New Method SetMultiSelectCol( [uCol], [lFooter] )
If called without params or uCol as nil, a new column is inserted
as the first column and set as multi-select-column. If uCol is
specified ...

... What all required is to make one call to the new Method SetMultiSelectCol().

Syntax:
oBrw:SetMultiSelectCol( [uCol], [lFooter] )

Parameters:
1. [uCol]: Optional. If the method is called without parameters or uCol as nil, xbrowse inserts a new column in the 1st ...