XBrowse 16.04 : Gets in Header Bar

[fraxzi]

lGetBar works for all datasources. It is independent of the datasource.

ooops, when :lIncrFilter := .T., the GetBar doesn't show. Normal?

I'd like to enable lSeekBar when user's select combobox option to search and to filter using incremental filtering displaying the :cSeek to seekbar/getbar

[fraxzi]

Mr. Rao,

How to toggle lSeekBar and lGetBar?

[fraxzi]

Mr. Rao,

How to toggle lSeekBar and lGetBar?

Mr. Rao,

This doesn't toggle:

Code: Select all | Expand

...
        @1, 210 COMBOBOX aGets[1] VAR aVars[1] PIXEL OF oBar;
                SIZE 100, 100 DROPWIDTH 150 UPDATE STYLE CBS_DROPDOWNLIST;
                ITEMS {'Search','Filter'};
                ON CHANGE ( oBrw:lSeekBar := Self:nAt == 1,;
                            oBrw:lGetBar := Self:nAt == 2,;
                            oBrw:Refresh() )
...
 

this toggles BUT Overlapped

Code: Select all | Expand

...
        @1, 210 COMBOBOX aGets[1] VAR aVars[1] PIXEL OF oBar;
                SIZE 100, 100 DROPWIDTH 150 UPDATE STYLE CBS_DROPDOWNLIST;
                ITEMS {'Search','Filter'};
                ON CHANGE ( oBrw:lSeekBar := iif(Self:nAt == 1, .T., NIL),;
                            oBrw:lGetBar := iif(Self:nAt == 2, .T., NIL),;
                            oBrw:Refresh() )
...
 

[nageswaragunupudi]

Toggling between lGetBar and lSeekBar is not possible in the current versions.
We will provide for this in version 18.06.

Note:
Setting lGetBar or lSeekBar as .T. automatically sets the other as .F.

[fraxzi]

Toggling between lGetBar and lSeekBar is not possible in the current versions.
We will provide for this in version 18.06.

Note:
Setting lGetBar or lSeekBar as .T. automatically sets the other as .F.

Copy Sir.

[damianodec]

Hi,
if I press the "clear filter" button the value into the get header remains there.
How can I clean the get fields when I press "clear filter" ?

[Antonio Linares]

Dear Damiano,

Please provide a screenshot, thanks!

[damianodec]

in LAST field filter is "simp" and I get SImpson


then I press "Clear Filter" Button but the value "simp" is still in the get header


How can I clear the field?

[cnavarro]

Please modify this sample with

Code: Select all | Expand

   @ 60,250 BTNBMP PROMPT "Clear Filter" ;
      SIZE 100,40 PIXEL OF oDlg FLAT ;
      ACTION ( oBrw:cAlias )->( DBCLEARFILTER(), oBrw:Refresh(), ClearFilter( oBrw ), oBrw:SetFocus() )   // Look

   ACTIVATE DIALOG oDlg CENTERED
   RELEASE FONT oFontB, oBoldB

return nil

//----------------------------------------------------------------------------//
// New code
// Function clean barget
//----------------------------------------------------------------------------//

static function ClearFilter( oBrw )

   local n

   for n := 1 to Len( oBrw:aCols )
      WITH OBJECT oBrw:aCols[ n ]
         if FieldType( n ) != 'L'
            :uBarGetVal    := uValBlank( fieldGet( n ) )
            if FieldType( n ) == 'N'
               :cBarGetPic := NumPict( FieldLen( n ), FieldDec( n ) )
            endif
         endif
         if hb_IsObject( :oBarGet )
            :oBarGet:Refresh()
         endif
      END
   next
Return nil

//----------------------------------------------------------------------------//

Please note that the functions used for applying and removing filters depend on the RDD (data source) you are using in xbrowse, and therefore the initialization of the oGetBar will also be different. This example is created using a DBF.
The important thing to clean the values ​​in the barget is to initialize the data :uBarGetVal of all columns. Their initial value, as I mentioned before, will depend on the RDD used in Xbrowse.

[damianodec]

good cNavarro
Thank you