FiveTech Software tech support forums

... LINES AUTOSORT NOBORDER FOOTERS CLASS TmyBrowse() WITH OBJECT oBrw :RestoreState( cState ) :aDefaultCols := aDefCols :SetUserCols(lSetUserCol) :lIncrFilter := .t. :bOnSort := { |b,oCol| oBrw:Seek( "" ), ; oBrw:cFilterFld := oCol:cExpr, ; oBrw:SetFocus() } :lDrawBorder := .t. :lHScroll ...

... is very slow, i.e. it takes more than a minute and a half and I don't understand why I set it this way in xbrowse :lHScroll  := .f.            :lIncrFilter      := .f.            :bOnSort          := { |b,oCol| oBrw:Seek( "" ), ;                                   oBrw:cFilterFld ...

... :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 == 0, { CLR_BLACK, ...

... "SALARY" SETUP ( ; oBrw:lHScroll := .f.,; oBrw:lVScroll := .f.,; 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 ...

... FILENAME "..\bitmaps\16x16\new.bmp" ;      FLAT ACTION( Test() ) TOOLTIP "Test xBrowse() lIncrFilter" GROUP      ;      FONT oFont   DEFINE BUTTON OF oBar PROMPT "Exit" FILENAME "..\bitmaps\16x16\Exit.bmp" ...

Mira se está bueno:

https://imgur.com/Ckm1lOE



Regards, saludos.

... @ 30,10 XBROWSE oBrw SIZE -10,-10 PIXEL OF oDlg ; COLUMNS aFlds HEADERS aHdrs ; DATASOURCE (cAlias) AUTOSORT CELL LINES NOBORDER WITH OBJECT oBrw :lIncrFilter := .t. :lSeekWild := ( nWild == 2 ) :cFilterFld := "FIRST" :nStretchCol := STRETCHCOL_WIDEST END @ 10, 10 COMBOBOX oBrw:cFilterFld ...

No comprendo. ¿Tienes un ejemplo completo para probar?

Saludos.

Funciona perfecto \samples\xbincflt.prg MDI oBrw:SetFocus() // con click NO RETORNA a oBrw @ 10, 10 COMBOBOX oBrw:cFilterFld ; ITEMS aHdrs ; ON CHANGE ( oBrw:Seek( "" ), oBrw:SetFocus() ) ; SIZE 50,400 PIXEL OF oDlg oDlg:oClient := oBrw oDlg:bPostEnd := {||oRs:Close(),oRs:=Nil} ACTIVATE DI...

Grrrrrr hoy estoy especialmente torpe. Mejor me voy a dormir la siesta.

Código correcto:

REQUEST DBFCDX

Ustedes entienden

En el código anterior por favor incluyan

REQUEST DBCDX

... tardes. Maestro Antonio, maestro Rao, gurús de xBrowse.... :D En el siguiente ejemplo con FWH 20.07 al utilizar xBrowse con TArrayData y se define lIncrFilter como .T., se genera un error "Undefine function HB_WILDMATCH" al momento de intentar hacer una búsqueda o filtro. En el primer ...

Hi, I have this:

oBrw:lSeekBar := .T.
oBrw:lIncrFilter := .F.
oBrw:lAutoSort := .T.
oBrw:lSeekWild := .T.

If I Set lincrFilter := .T. lSeekBar dont apear even I set lSeekBar .T.

lseekBar and lIncrFilter works together?

Thanks!

... := "D/C" Lista10:l2007:=.t. Lista10:cAlias := "PLANO" Lista10:nStretchCol := STRETCHCOL_LAST Lista10:lSeekBar := .T. Lista10:lIncrFilter := .T. Lista10:lSeekWild := .T. Lista10:lAutoSort := .T. Lista10:lFastEdit := .T. lista10:aCols[1]:cOrdBag := "PLANO" Lista10:aCols[1]:cSortOrder ...

... fijandome en las sugerencias de cristobal y joao. lo unico que hice fue agregar esto: . . . oBrwArticulos :lAutoSort := .t. oBrwArticulos :lIncrFilter := .t. oBrwArticulos :lSeekWild := .t. oBrwArticulos :Seek("") . . . REDEFINE SAY oBrwArticulos:oSeek ID 4004 PROMPT oBrwArticulos:cSeek ...