FiveTech Software tech support forums

... := .F. :lDisplayZeros := .F. :lRecordSelector := .F. :lHScroll := .F. :l2007 := .F. :lFooter := .T. :lDrawBorder := .T. :lAllowColReGroup := .T. :lColDividerComplete := .T. :SetGroupHeader( 'Jornada', 5,6, oFont ) :SetGroupHeader( 'Refrigerio', 7,8, oFont ) :bClrHeader := {|| { nRGB(000,000,000), ...

... := .F. :lDisplayZeros := .F. :lRecordSelector := .F. :lHScroll := .F. :l2007 := .F. :lFooter := .T. :lDrawBorder := .T. :lAllowColReGroup := .T. :lColDividerComplete := .T. :lIncrFilter := .F. :nStretchCol := STRETCHCOL_WIDEST :bClrSel := { || { CLR_BLACK, CLR_HGRAY } } :bClrStd := {|| IIf( oBrw:KeyNo() ...

... := 2 // color gris y fino la division de columnas oBrw:nColDividerStyle := 0 // color gris y fino la division de renglones oBrw:lColDividerComplete := .f. // la division de renglones es hasta donde hay datos // anulo el doble color d los registros oBrw:lContrastClr := .f. oBrw:lHScroll ...

... oBrw:bClrSelFocus := {|| { nRGB( 0, 0, 0), nRGB(128,255,128) } } // para barra de linea selecc cuando el control tiene el foco oBrw:lColDividerComplete := (.t.) // (.T.) Mantiene siempre llena la pantalla oBrw:nHeaderHeight := 35 // Altura de los encabezados oBrw:nRowHeight := 25 ...

... oBrw:lToolbar := .f.,; // not ok oBrw:lFullGridClr := .t.,; oBrw:lIncrFilter := .t.,; oBrw:lSeekWild := .t.,; oBrw:lTabLikeExcel := .t.,; oBrw:lColDividerComplete := .t.,; oBrw:lRecordSelector := .f.,; oBrw:lDrawBorder := .t.; )

... } } olbx1:bClrSelFocus := { || { CLR_BLACK, aGradBarSelFocus } } olbx1:nColDividerStyle := LINESTYLE_BLACK olbx1:nMarqueeStyle := 3 olbx1:lcoldividercomplete:=.f. olbx1:acols[1]:lAllowsizing:=.f. olbx1:nRowDividerStyle := LINESTYLE_BLACK olbx1:lallowrowsizing :=.f. olbx1:setcolor(rgb(0,0,0),rgb(255,255,206)) ...

Creo que puede haber otra posibilidad utilizando las DATAS lColDividerComplete y lRowDividerComplete con valor .T., y lFullGrid a .F., haciendo estos pequeños cambios en el Method Paint de la clase XBrowse, así podremos seguir utilizando ambas posibilidades ...

nageswaragunupudi wrote:
if there is only one line why do the lines go all the way to the bottom of the xbrowse? (1)

Please see the DATAs
lRowDividerComplete
lColDividerComplete

By default both of them are .F.
Do not set any of them to .T.

Do not use LINES clause in XBROWSE definition

Sorry I forget them

if there is only one line why do the lines go all the way to the bottom of the xbrowse? (1)

Please see the DATAs
lRowDividerComplete
lColDividerComplete

By default both of them are .F.
Do not set any of them to .T.

Do not use LINES clause in XBROWSE definition

... := .F. :lDisplayZeros := .F. :lRecordSelector := .F. :lHScroll := .F. :l2007 := .F. :lFooter := .T. :lDrawBorder := .t. :lAllowColReGroup := .T. :lColDividerComplete := .T. :nRowDividerStyle :=LINESTYLE_BLACK :bClrHeader := {|| { nRGB(000,000,000), nRGB(128,255,128) } } :bClrSel := { || { CLR_BLACK, ...

... oBrw:nMarqueeStyle := MARQSTYLE_HIGHLCELL // es 3 oBrw:nColDividerStyle := LINESTYLE_BLACK oBrw:nRowDividerStyle := LINESTYLE_BLACK oBrw:lColDividerComplete := .t. oBrw:nHeaderLines := 1 // Altura encabezamiento oBrw:nDataLines := 1 // Altura líneas oBrw:lRecordSelector := .t. //poner ...

... AL_CENTER oBrw:nMarqueeStyle := MARQSTYLE_HIGHLCELL // es 3 oBrw:nColDividerStyle := LINESTYLE_BLACK oBrw:nRowDividerStyle := LINESTYLE_BLACK oBrw:lColDividerComplete := .t. oBrw:bClrStd := { || { CLR_BLACK, If( oBrw:KeyNo % 2 == 0, RGB(160,225,255), CLR_WHITE ) } } // Efecto pijama oBrw:SetFocus() ...

... := .f. oBrw:lRecordSelector := .T. oBrw:lVScroll := .t. oBrw:lHScroll := .f. oBrw:lColChangeNotify := .t. oBrw:lAllowColReGroup := .t. oBrw:lColDividerComplete := .t. oBrw:nColDividerStyle := LINESTYLE_NOLINES oBrw:nRowDividerStyle := LINESTYLE_LIGHTGRAY oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROWMS ...

... oCol ) Return NIL > END :nMarqueeStyle := MARQSTYLE_HIGHLROW :nColDividerStyle := LINESTYLE_NOLINES :nRowDividerStyle := LINESTYLE_NOLINES :lColDividerComplete := .F. :lUpdate := .T. :lRecordSelector := .F. :lHeader := .F. :lHScroll := .F. :nHeaderHeight := 30 :nRowHeight := 85 :bClrHeader ...

... := MARQSTYLE_HIGHLROWRC :lMultiSelect := .t. :nStretchCol := STRETCHCOL_WIDEST :bClrStd := {|| { RGB(0,0,0),colores( aItems[ oBrw:nat, 4 ] ) } } :lColDividerComplete := .T. :lAllowColHiding := .F. :lRecordSelector := .F. END WITH

FiveTech Software tech support forums

Search found 137 matches: lcoldividercomplete

Re: FWH64 : ERROR SE SALE DEL SISTEMA

Error Fwh 24.02 con XBROWSE

Problemas con comportamiento de XBrowse.

evitar que se active columna con xbrowse al dar un click

Xbrowser() setting not found

Re: ERROR XBROWSE CON MERGEVERT

Re: Problema pintado xbrowse FWH2210

Re: questions about xbrowse to understand better

Re: questions about xbrowse to understand better

Re: xbrowse + Tdolphin + Mysql

XBROWSE REFRESCO DE TABLA

XBROWSE MARIADB REFRESCAR TABLA

Imágenes en Xbrowse [SOLUCIONADO]

Re: To Mister Nages - xBrowser

Re: pintar filas en xbrowse multiselect