topic-36671

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

lGetBar
Posted: Fri Jan 25, 2019 12:59 PM

Hola buenos días, necesito utilizar el filtro en xBrowse

::lGetBar := .t.

y solo me muestra esto: no me muestra el GET
Agradezco cualquier ayuda.

Saludos
Marcelo

FWH - Harbour - BCC7 - PellesC

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: lGetBar
Posted: Fri Jan 25, 2019 08:37 PM

fwh\samples\xbgetbar.prg

Regards

G. N. Rao.

Hyderabad, India

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Fri Jan 25, 2019 10:26 PM

Hola Rao, si eso fue lo primero que hice.
Lo compilo y funciona bien, no se porque no me anda en el sistema que estoy haciendo
Gracias por contestar
Saludos

FWH - Harbour - BCC7 - PellesC

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: lGetBar
Posted: Mon Jan 28, 2019 03:09 PM

Setting oBrw:lGetBar to .t. or .f. only toggles display of the bar.

To make the Gets work, we should first prepare the Gets for the required columns.
This is simple

Code (fw): Select all Collapse

oCol:uBarGetVal := <blankvalue_of the datatype>

You need to do this for those columns for which you want the Gets to work.
Once you assign this, XBrowse constructs Gets for these columns when initializing the browse.

Optionally you can also provide a picture.

Code (fw): Select all Collapse

oCol:cBarGetPic := <picture>

Assuming that the field Marca is character type length 20
You can do

Code (fw): Select all Collapse

oBrw:Marca:uBarGetVal := Space(20)

Regards

G. N. Rao.

Hyderabad, India

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Mon Jan 28, 2019 07:09 PM

Hola Rao, genial ahora si me muestra los gets ja pequeño detalle no lo habia visto.
Puedo en lugar de poner un boton para que haga el filtro, a traves de un evento de cambio filtrar, osea ese get tiene ese evento?
y a los gets se los puede tratar en algunos casos como un combo?
Gracias de antemano
saludos
Marcelo

FWH - Harbour - BCC7 - PellesC

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: lGetBar
Posted: Tue Jan 29, 2019 01:13 AM

Code (fw): Select all Collapse

oCol:aBarGetList:   If you assign an array combobox will be displayed
oCol:bBarGetValid:  You can take action when the user completes the entry
oCol:cBarGetBmp:    bmp file name to show button on the get
oCol:bBarGetAction: Button action
oCol:bBarGetChange: as it means

We kept improving bargets.
I am not sure how many of the above work in 18.03.
Please try the above datas

Regards

G. N. Rao.

Hyderabad, India

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Tue Jan 29, 2019 01:21 AM

Muchas gracias Rao, pruebo y comento.
Una pregunta se puede usar un combo en lugar de un get?
Saludos

FWH - Harbour - BCC7 - PellesC

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Tue Jan 29, 2019 01:22 AM

Perdon ahi lei que si, voy a probar
Gracias

FWH - Harbour - BCC7 - PellesC

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Tue Jan 29, 2019 09:46 PM

Hola buenas tardes, comento que logre hacer funcionar los filtros, lo unico que me falta es poder ejecutar una cierta tarea despues de cambiar una opcion del combo.

Code (fw): Select all Collapse

::oBrw:aCols[5]:bBarGetValid := ::validoRubro() 
::oBrw:aCols[5]:bBarGetChange := ::validoRubro()

Cualquiera de las dos opciones que uso solo entra al inicio, luego al cambiar una opcion del combo no ingresa a ese metodo
Espero que me puedan ayudar con esto, y ya me quedaria como queria.
Saludos

FWH - Harbour - BCC7 - PellesC

joseluisysturiz

Posts: 2064

Joined: Fri Jan 06, 2006 09:28 PM

Re: lGetBar
Posted: Wed Jan 30, 2019 02:34 AM

Saludos, podrias colocar una imagen con xbrowse y combo box.? crei no era posible, gracias... :shock:

Dios no está muerto...

Gracias a mi Dios ante todo!

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Wed Jan 30, 2019 03:49 AM

Code (fw): Select all Collapse

                ::oBrw:lGetBar   := .t.
                ::oBrw:nGetBarHeight:=33

                ::oBrw:aCols[2]:uBarGetVal  := Space(15)

                ::oBrw:aCols[3]:uBarGetVal  := Space(20)
                ::oBrw:aCols[3]:aBarGetList := ::aMarca

                ::oBrw:aCols[4]:uBarGetVal  := Space(40)

                ::oBrw:aCols[5]:uBarGetVal  := Space(30)
                ::oBrw:aCols[5]:aBarGetList := ::aRubro

                ::oBrw:aCols[6]:uBarGetVal  := Space(25) 
                ::oBrw:aCols[6]:aBarGetList := ::aTipoArt

FWH - Harbour - BCC7 - PellesC

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Wed Jan 30, 2019 05:01 AM

Como ven en la imagen tengo varios combos, al seleccionar un rubro, necesito actualizar el combo de marcas y cambia su contenido de acuerdo al rubro que seleccione, la sentencia sql ya la hice y el array lo actualizo, pero al volver asignar ese array a la lista no me lo muestra, no lo actualiza con los nuevos valores.

::oBrw:aCols[3]:aBarGetList := ::aMarca

Agradezco si me puedes ayudar
Gracias
Marcelo

FWH - Harbour - BCC7 - PellesC

Marc Venken

Posts: 1487

Joined: Tue Jun 14, 2016 07:51 AM

Re: lGetBar
Posted: Wed Jan 30, 2019 08:40 PM

I have not seen it, but is it possible to have a range in a Getbar ?

Ex. like this

> 500

or > 250 .and. < 1500

or

If a City has only 2 Chars

As it will show all with As into the city name. Maybe a way that we can see only if it has AS. like =="AS"

Marc Venken

Using: FWH 23.08 with Harbour

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: lGetBar
Posted: Wed Jan 30, 2019 09:05 PM

En la imagen que muestro hay un importe el del precio, pero no le puse filtro pero se me paso la idea de que en algun momento pueda necesitar eso del rango de numeros.
Creo que no se puede por lo que vi y si se puede no se como es
Saludos

FWH - Harbour - BCC7 - PellesC

joseluisysturiz

Posts: 2064

Joined: Fri Jan 06, 2006 09:28 PM

Re: lGetBar
Posted: Wed Jan 30, 2019 09:32 PM

Marcelo Roggeri wrote:

Code (fw): Select all Collapse

                ::oBrw:lGetBar   := .t.
                ::oBrw:nGetBarHeight:=33

                ::oBrw:aCols[2]:uBarGetVal  := Space(15)

                ::oBrw:aCols[3]:uBarGetVal  := Space(20)
                ::oBrw:aCols[3]:aBarGetList := ::aMarca

                ::oBrw:aCols[4]:uBarGetVal  := Space(40)

                ::oBrw:aCols[5]:uBarGetVal  := Space(30)
                ::oBrw:aCols[5]:aBarGetList := ::aRubro

                ::oBrw:aCols[6]:uBarGetVal  := Space(25) 
                ::oBrw:aCols[6]:aBarGetList := ::aTipoArt

Muy buena la imagen, es lo que ando buscando, gracias, saludos...

Dios no está muerto...

Gracias a mi Dios ante todo!

FiveTech Support Forums