FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour XBrowse 16.04 : Gets in Header Bar
Posts: 811
Joined: Tue May 06, 2008 04:28 AM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Sat Jul 21, 2018 03:58 AM
nageswaragunupudi wrote: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

:-)
Kind Regards,

Frances



Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15
Posts: 811
Joined: Tue May 06, 2008 04:28 AM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Sat Jul 21, 2018 08:03 AM

Mr. Rao,

How to toggle lSeekBar and lGetBar?

:?:

Kind Regards,

Frances



Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15
Posts: 811
Joined: Tue May 06, 2008 04:28 AM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Sat Jul 21, 2018 08:23 AM
fraxzi wrote:Mr. Rao,

How to toggle lSeekBar and lGetBar?

:-)



Mr. Rao,

This doesn't toggle:
Code (fw): Select all Collapse
...
        @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 (fw): Select all Collapse
...
        @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() )
...
Kind Regards,

Frances



Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Mon Jul 23, 2018 07:48 AM

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.

Regards



G. N. Rao.

Hyderabad, India
Posts: 811
Joined: Tue May 06, 2008 04:28 AM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Tue Jul 24, 2018 12:08 AM
nageswaragunupudi wrote: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. :-)
Kind Regards,

Frances



Fivewin for xHarbour v18.07

xHarbour v1.2.3.x

BCC 7.3 + PellesC8 ( Resource Compiler only)

ADS 10.1 / MariaDB

Crystal Reports 8.5/9.23 DE

xMate v1.15
Posts: 434
Joined: Wed Jun 06, 2007 02:58 PM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Wed Apr 09, 2025 08:43 AM

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" ?

FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Wed Apr 09, 2025 09:23 AM

Dear Damiano,

Please provide a screenshot, thanks!

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 434
Joined: Wed Jun 06, 2007 02:58 PM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Wed Apr 09, 2025 09:56 AM
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?
FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Wed Apr 09, 2025 10:25 AM
Please modify this sample with
   @ 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.
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 434
Joined: Wed Jun 06, 2007 02:58 PM
Re: XBrowse 16.04 : Gets in Header Bar
Posted: Wed Apr 09, 2025 12:35 PM

good cNavarro

Thank you

FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)

Continue the discussion