Saudos a todos
Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
x, cada vez que que teclee una letra quiero que se vaya mostrando en un
brow los nombres de los productos que van coincidiendo con lo que voy
tecleando el el TEdit.
Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
agradecido. no tengo la menor idea de como hacerlo,, please help
Gracias de antemanos
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
busqueda Incremental
- ignacio
- Site Admin
- Mensajes: 9442
- Registrado: Lun Abr 06, 2015 8:00 pm
- Ubicación: Madrid, Spain
- Contactar:
busqueda Incremental
Carlos,
En el evento OnChange del TEdit establecer el filtro en el Browse. No es muy
complicado.
Un saludo,
"Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Saudos a todos
>
> Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto x,
> cada vez que que teclee una letra quiero que se vaya mostrando en un brow
> los nombres de los productos que van coincidiendo con lo que voy tecleando
> el el TEdit.
>
> Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> agradecido. no tengo la menor idea de como hacerlo,, please help
>
> Gracias de antemanos
En el evento OnChange del TEdit establecer el filtro en el Browse. No es muy
complicado.
Un saludo,
"Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Saudos a todos
>
> Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto x,
> cada vez que que teclee una letra quiero que se vaya mostrando en un brow
> los nombres de los productos que van coincidiendo con lo que voy tecleando
> el el TEdit.
>
> Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> agradecido. no tengo la menor idea de como hacerlo,, please help
>
> Gracias de antemanos
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
busqueda Incremental
Si mira, yo lo estoy tratando de hacer precisamente con el evento onchange
del TEdit,, pero me disculpa por decirte que no tengo la menor idea de como
hacerlo
Si pudiera solo escribirme un par de lienas con la idea central, te lo
agradeceria muchisimo
Saludos
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Carlos,
>
> En el evento OnChange del TEdit establecer el filtro en el Browse. No es
muy
> complicado.
>
> Un saludo,
>
> "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
> news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Saudos a todos
> >
> > Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
x,
> > cada vez que que teclee una letra quiero que se vaya mostrando en un
brow
> > los nombres de los productos que van coincidiendo con lo que voy
tecleando
> > el el TEdit.
> >
> > Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> > agradecido. no tengo la menor idea de como hacerlo,, please help
> >
> > Gracias de antemanos
>
>
del TEdit,, pero me disculpa por decirte que no tengo la menor idea de como
hacerlo
Si pudiera solo escribirme un par de lienas con la idea central, te lo
agradeceria muchisimo
Saludos
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Carlos,
>
> En el evento OnChange del TEdit establecer el filtro en el Browse. No es
muy
> complicado.
>
> Un saludo,
>
> "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
> news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Saudos a todos
> >
> > Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
x,
> > cada vez que que teclee una letra quiero que se vaya mostrando en un
brow
> > los nombres de los productos que van coincidiendo con lo que voy
tecleando
> > el el TEdit.
> >
> > Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> > agradecido. no tengo la menor idea de como hacerlo,, please help
> >
> > Gracias de antemanos
>
>
-
- Mensajes: 203
- Registrado: Vie Abr 01, 2005 9:05 am
busqueda Incremental
Carlos,
Una orientacion de por donde van los tiros:
METHOD Edit1Change( oSender ) CLASS TForm13
Articulo->( DBSeek( ::oEdit1:Value, .t. ) )
::oBrowse:Refresh()
RETURN Nil
Saludos
Jose Alfonso Suarez
Carlos Cedeño Vera escribió:
> Si mira, yo lo estoy tratando de hacer precisamente con el evento onchange
> del TEdit,, pero me disculpa por decirte que no tengo la menor idea de como
> hacerlo
>
> Si pudiera solo escribirme un par de lienas con la idea central, te lo
> agradeceria muchisimo
>
> Saludos
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
>>Carlos,
>>
>>En el evento OnChange del TEdit establecer el filtro en el Browse. No es
>
> muy
>
>>complicado.
>>
>>Un saludo,
>>
>>"Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
>>news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>>>Saudos a todos
>>>
>>>Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
>
> x,
>
>>>cada vez que que teclee una letra quiero que se vaya mostrando en un
>
> brow
>
>>>los nombres de los productos que van coincidiendo con lo que voy
>
> tecleando
>
>>>el el TEdit.
>>>
>>>Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
>>>agradecido. no tengo la menor idea de como hacerlo,, please help
>>>
>>>Gracias de antemanos
>>
>>
>
>
Una orientacion de por donde van los tiros:
METHOD Edit1Change( oSender ) CLASS TForm13
Articulo->( DBSeek( ::oEdit1:Value, .t. ) )
::oBrowse:Refresh()
RETURN Nil
Saludos
Jose Alfonso Suarez
Carlos Cedeño Vera escribió:
> Si mira, yo lo estoy tratando de hacer precisamente con el evento onchange
> del TEdit,, pero me disculpa por decirte que no tengo la menor idea de como
> hacerlo
>
> Si pudiera solo escribirme un par de lienas con la idea central, te lo
> agradeceria muchisimo
>
> Saludos
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>
>>Carlos,
>>
>>En el evento OnChange del TEdit establecer el filtro en el Browse. No es
>
> muy
>
>>complicado.
>>
>>Un saludo,
>>
>>"Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
>>news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
>>
>>>Saudos a todos
>>>
>>>Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
>
> x,
>
>>>cada vez que que teclee una letra quiero que se vaya mostrando en un
>
> brow
>
>>>los nombres de los productos que van coincidiendo con lo que voy
>
> tecleando
>
>>>el el TEdit.
>>>
>>>Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
>>>agradecido. no tengo la menor idea de como hacerlo,, please help
>>>
>>>Gracias de antemanos
>>
>>
>
>
busqueda Incremental
Para el ejmplo que expongo, sucede lo siguiente,
METHOD FormCreate( oSender ) CLASS TBuscar
LOCAL cFiltro
::oForm := Application:oMainForm
WITH OBJECT ::oForm:oDSEquipos
:lShared := .T.
if !:lOpen
:lOpen := .T.
EndIF
:Select()
cFiltro := DBFILTER()
:ClearFilTer()
:goTop()
*:OrdSetfocus(Iif(::oRadioMenu1:nIndex == 1,"BYIDINV","BYDESCRIP"))
//,iif(::oRadioMenu1:nIndex == 3,"BYDESCRIP""))
END
RETURN Nil
METHOD Buscar() CLASS TBuscar /////// este Methodo lo ejecuto desde el
Evento onchange del TEdit(::oEdDescrip)
LOCAL lDone
with object ::oForm:oDSEquipos //:Locate(::oEdDescrip:Value,.T.)
if !:lOpen
:lOpen := .T.
EndIf
::oBrFind:aCols[2]:cFilter := alltrim(::oEdDescrip:Value)
::oBrfind:Refresh(.t.)
END
RETURN NIL
Ahora bien,, no me funciona esto. Tambien hay algo curioso, cuando hago la
llamada a este formulario donde buscare de la forma que te explico, se
mantienen los datos filtrados como lo tengo en el formulario llamante,,
quito el filtro de varias formas y nada,, dbclearFilter(),
::oDSEquipos:CliearFilter(), Set Filter to,, y nada me hace que muestre los
datos sin filtrado....... can you help please???
GRacias de ante manos
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Carlos,
>
> En el evento OnChange del TEdit establecer el filtro en el Browse. No es
muy
> complicado.
>
> Un saludo,
>
> "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
> news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Saudos a todos
> >
> > Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
x,
> > cada vez que que teclee una letra quiero que se vaya mostrando en un
brow
> > los nombres de los productos que van coincidiendo con lo que voy
tecleando
> > el el TEdit.
> >
> > Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> > agradecido. no tengo la menor idea de como hacerlo,, please help
> >
> > Gracias de antemanos
>
>
METHOD FormCreate( oSender ) CLASS TBuscar
LOCAL cFiltro
::oForm := Application:oMainForm
WITH OBJECT ::oForm:oDSEquipos
:lShared := .T.
if !:lOpen
:lOpen := .T.
EndIF
:Select()
cFiltro := DBFILTER()
:ClearFilTer()
:goTop()
*:OrdSetfocus(Iif(::oRadioMenu1:nIndex == 1,"BYIDINV","BYDESCRIP"))
//,iif(::oRadioMenu1:nIndex == 3,"BYDESCRIP""))
END
RETURN Nil
METHOD Buscar() CLASS TBuscar /////// este Methodo lo ejecuto desde el
Evento onchange del TEdit(::oEdDescrip)
LOCAL lDone
with object ::oForm:oDSEquipos //:Locate(::oEdDescrip:Value,.T.)
if !:lOpen
:lOpen := .T.
EndIf
::oBrFind:aCols[2]:cFilter := alltrim(::oEdDescrip:Value)
::oBrfind:Refresh(.t.)
END
RETURN NIL
Ahora bien,, no me funciona esto. Tambien hay algo curioso, cuando hago la
llamada a este formulario donde buscare de la forma que te explico, se
mantienen los datos filtrados como lo tengo en el formulario llamante,,
quito el filtro de varias formas y nada,, dbclearFilter(),
::oDSEquipos:CliearFilter(), Set Filter to,, y nada me hace que muestre los
datos sin filtrado....... can you help please???
GRacias de ante manos
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Carlos,
>
> En el evento OnChange del TEdit establecer el filtro en el Browse. No es
muy
> complicado.
>
> Un saludo,
>
> "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
> news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Saudos a todos
> >
> > Sucede, que tengo un TEdit donde voy tecleando el nombre de un producto
x,
> > cada vez que que teclee una letra quiero que se vaya mostrando en un
brow
> > los nombres de los productos que van coincidiendo con lo que voy
tecleando
> > el el TEdit.
> >
> > Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> > agradecido. no tengo la menor idea de como hacerlo,, please help
> >
> > Gracias de antemanos
>
>
-
- Mensajes: 155
- Registrado: Vie Mar 14, 2008 7:25 am
- Ubicación: Almería
busqueda Incremental
Hola Carlos,
En una pequeña agenda tengo lo que estas buscado, mira a ver si te sirve.
Saludos. Miguel Castaño.
METHOD Edit1Change( oSender ) CLASS TForm1
LOCAL X
X = ::oEdit1 : cText
//
IF len(alltrim(x)) > 0
SET FILTER TO AT(RTRIM(X),Agenda->NOMBRE) != 0
ELSE
SET FILTER TO
ENDIF
//
::ODBBrowse1:Refresh()
::ODBBrowse1:GoTop()
RETURN Nil
"Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
news:[email=42ade76e@ozsrvnegro.ozlan.local...]42ade76e@ozsrvnegro.ozlan.local...[/email]
> Para el ejmplo que expongo, sucede lo siguiente,
>
>
> METHOD FormCreate( oSender ) CLASS TBuscar
> LOCAL cFiltro
> ::oForm := Application:oMainForm
> WITH OBJECT ::oForm:oDSEquipos
> :lShared := .T.
> if !:lOpen
> :lOpen := .T.
> EndIF
> :Select()
> cFiltro := DBFILTER()
> :ClearFilTer()
> :goTop()
> *:OrdSetfocus(Iif(::oRadioMenu1:nIndex == 1,"BYIDINV","BYDESCRIP"))
> //,iif(::oRadioMenu1:nIndex == 3,"BYDESCRIP""))
> END
> RETURN Nil
>
> METHOD Buscar() CLASS TBuscar /////// este Methodo lo ejecuto desde el
> Evento onchange del TEdit(::oEdDescrip)
> LOCAL lDone
> with object ::oForm:oDSEquipos //:Locate(::oEdDescrip:Value,.T.)
> if !:lOpen
> :lOpen := .T.
> EndIf
> ::oBrFind:aCols[2]:cFilter := alltrim(::oEdDescrip:Value)
> ::oBrfind:Refresh(.t.)
> END
>
> RETURN NIL
>
> Ahora bien,, no me funciona esto. Tambien hay algo curioso, cuando hago
la
> llamada a este formulario donde buscare de la forma que te explico, se
> mantienen los datos filtrados como lo tengo en el formulario llamante,,
> quito el filtro de varias formas y nada,, dbclearFilter(),
> ::oDSEquipos:CliearFilter(), Set Filter to,, y nada me hace que muestre
los
> datos sin filtrado....... can you help please???
>
> GRacias de ante manos
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Carlos,
> >
> > En el evento OnChange del TEdit establecer el filtro en el Browse. No es
> muy
> > complicado.
> >
> > Un saludo,
> >
> > "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el
mensaje
> > news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > > Saudos a todos
> > >
> > > Sucede, que tengo un TEdit donde voy tecleando el nombre de un
producto
> x,
> > > cada vez que que teclee una letra quiero que se vaya mostrando en un
> brow
> > > los nombres de los productos que van coincidiendo con lo que voy
> tecleando
> > > el el TEdit.
> > >
> > > Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> > > agradecido. no tengo la menor idea de como hacerlo,, please help
> > >
> > > Gracias de antemanos
> >
> >
>
>
En una pequeña agenda tengo lo que estas buscado, mira a ver si te sirve.
Saludos. Miguel Castaño.
METHOD Edit1Change( oSender ) CLASS TForm1
LOCAL X
X = ::oEdit1 : cText
//
IF len(alltrim(x)) > 0
SET FILTER TO AT(RTRIM(X),Agenda->NOMBRE) != 0
ELSE
SET FILTER TO
ENDIF
//
::ODBBrowse1:Refresh()
::ODBBrowse1:GoTop()
RETURN Nil
"Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
news:[email=42ade76e@ozsrvnegro.ozlan.local...]42ade76e@ozsrvnegro.ozlan.local...[/email]
> Para el ejmplo que expongo, sucede lo siguiente,
>
>
> METHOD FormCreate( oSender ) CLASS TBuscar
> LOCAL cFiltro
> ::oForm := Application:oMainForm
> WITH OBJECT ::oForm:oDSEquipos
> :lShared := .T.
> if !:lOpen
> :lOpen := .T.
> EndIF
> :Select()
> cFiltro := DBFILTER()
> :ClearFilTer()
> :goTop()
> *:OrdSetfocus(Iif(::oRadioMenu1:nIndex == 1,"BYIDINV","BYDESCRIP"))
> //,iif(::oRadioMenu1:nIndex == 3,"BYDESCRIP""))
> END
> RETURN Nil
>
> METHOD Buscar() CLASS TBuscar /////// este Methodo lo ejecuto desde el
> Evento onchange del TEdit(::oEdDescrip)
> LOCAL lDone
> with object ::oForm:oDSEquipos //:Locate(::oEdDescrip:Value,.T.)
> if !:lOpen
> :lOpen := .T.
> EndIf
> ::oBrFind:aCols[2]:cFilter := alltrim(::oEdDescrip:Value)
> ::oBrfind:Refresh(.t.)
> END
>
> RETURN NIL
>
> Ahora bien,, no me funciona esto. Tambien hay algo curioso, cuando hago
la
> llamada a este formulario donde buscare de la forma que te explico, se
> mantienen los datos filtrados como lo tengo en el formulario llamante,,
> quito el filtro de varias formas y nada,, dbclearFilter(),
> ::oDSEquipos:CliearFilter(), Set Filter to,, y nada me hace que muestre
los
> datos sin filtrado....... can you help please???
>
> GRacias de ante manos
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > Carlos,
> >
> > En el evento OnChange del TEdit establecer el filtro en el Browse. No es
> muy
> > complicado.
> >
> > Un saludo,
> >
> > "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el
mensaje
> > news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > > Saudos a todos
> > >
> > > Sucede, que tengo un TEdit donde voy tecleando el nombre de un
producto
> x,
> > > cada vez que que teclee una letra quiero que se vaya mostrando en un
> brow
> > > los nombres de los productos que van coincidiendo con lo que voy
> tecleando
> > > el el TEdit.
> > >
> > > Por favor, si alguien tiene un pequeño ejemplo, le estare eternamente
> > > agradecido. no tengo la menor idea de como hacerlo,, please help
> > >
> > > Gracias de antemanos
> >
> >
>
>
busqueda Incremental
Miguel
Muchas gracias
"Miguel C." <mcastabaron@cajamar.es> escribió en el mensaje
news:[email=42ae8a05@ozsrvnegro.ozlan.local...]42ae8a05@ozsrvnegro.ozlan.local...[/email]
>
> Hola Carlos,
> En una pequeña agenda tengo lo que estas buscado, mira a ver si te sirve.
> Saludos. Miguel Castaño.
>
> METHOD Edit1Change( oSender ) CLASS TForm1
>
> LOCAL X
> X = ::oEdit1 : cText
> //
> IF len(alltrim(x)) > 0
> SET FILTER TO AT(RTRIM(X),Agenda->NOMBRE) != 0
> ELSE
> SET FILTER TO
> ENDIF
> //
> ::ODBBrowse1:Refresh()
> ::ODBBrowse1:GoTop()
>
>
> RETURN Nil
>
> "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
> news:[email=42ade76e@ozsrvnegro.ozlan.local...]42ade76e@ozsrvnegro.ozlan.local...[/email]
> > Para el ejmplo que expongo, sucede lo siguiente,
> >
> >
> > METHOD FormCreate( oSender ) CLASS TBuscar
> > LOCAL cFiltro
> > ::oForm := Application:oMainForm
> > WITH OBJECT ::oForm:oDSEquipos
> > :lShared := .T.
> > if !:lOpen
> > :lOpen := .T.
> > EndIF
> > :Select()
> > cFiltro := DBFILTER()
> > :ClearFilTer()
> > :goTop()
> > *:OrdSetfocus(Iif(::oRadioMenu1:nIndex ==
1,"BYIDINV","BYDESCRIP"))
> > //,iif(::oRadioMenu1:nIndex == 3,"BYDESCRIP""))
> > END
> > RETURN Nil
> >
> > METHOD Buscar() CLASS TBuscar /////// este Methodo lo ejecuto desde
el
> > Evento onchange del TEdit(::oEdDescrip)
> > LOCAL lDone
> > with object ::oForm:oDSEquipos //:Locate(::oEdDescrip:Value,.T.)
> > if !:lOpen
> > :lOpen := .T.
> > EndIf
> > ::oBrFind:aCols[2]:cFilter := alltrim(::oEdDescrip:Value)
> > ::oBrfind:Refresh(.t.)
> > END
> >
> > RETURN NIL
> >
> > Ahora bien,, no me funciona esto. Tambien hay algo curioso, cuando hago
> la
> > llamada a este formulario donde buscare de la forma que te explico, se
> > mantienen los datos filtrados como lo tengo en el formulario llamante,,
> > quito el filtro de varias formas y nada,, dbclearFilter(),
> > ::oDSEquipos:CliearFilter(), Set Filter to,, y nada me hace que muestre
> los
> > datos sin filtrado....... can you help please???
> >
> > GRacias de ante manos
> >
> > "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el
mensaje
> > news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > > Carlos,
> > >
> > > En el evento OnChange del TEdit establecer el filtro en el Browse. No
es
> > muy
> > > complicado.
> > >
> > > Un saludo,
> > >
> > > "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el
> mensaje
> > > news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > > > Saudos a todos
> > > >
> > > > Sucede, que tengo un TEdit donde voy tecleando el nombre de un
> producto
> > x,
> > > > cada vez que que teclee una letra quiero que se vaya mostrando en un
> > brow
> > > > los nombres de los productos que van coincidiendo con lo que voy
> > tecleando
> > > > el el TEdit.
> > > >
> > > > Por favor, si alguien tiene un pequeño ejemplo, le estare
eternamente
> > > > agradecido. no tengo la menor idea de como hacerlo,, please help
> > > >
> > > > Gracias de antemanos
> > >
> > >
> >
> >
>
>
Muchas gracias
"Miguel C." <mcastabaron@cajamar.es> escribió en el mensaje
news:[email=42ae8a05@ozsrvnegro.ozlan.local...]42ae8a05@ozsrvnegro.ozlan.local...[/email]
>
> Hola Carlos,
> En una pequeña agenda tengo lo que estas buscado, mira a ver si te sirve.
> Saludos. Miguel Castaño.
>
> METHOD Edit1Change( oSender ) CLASS TForm1
>
> LOCAL X
> X = ::oEdit1 : cText
> //
> IF len(alltrim(x)) > 0
> SET FILTER TO AT(RTRIM(X),Agenda->NOMBRE) != 0
> ELSE
> SET FILTER TO
> ENDIF
> //
> ::ODBBrowse1:Refresh()
> ::ODBBrowse1:GoTop()
>
>
> RETURN Nil
>
> "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el mensaje
> news:[email=42ade76e@ozsrvnegro.ozlan.local...]42ade76e@ozsrvnegro.ozlan.local...[/email]
> > Para el ejmplo que expongo, sucede lo siguiente,
> >
> >
> > METHOD FormCreate( oSender ) CLASS TBuscar
> > LOCAL cFiltro
> > ::oForm := Application:oMainForm
> > WITH OBJECT ::oForm:oDSEquipos
> > :lShared := .T.
> > if !:lOpen
> > :lOpen := .T.
> > EndIF
> > :Select()
> > cFiltro := DBFILTER()
> > :ClearFilTer()
> > :goTop()
> > *:OrdSetfocus(Iif(::oRadioMenu1:nIndex ==
1,"BYIDINV","BYDESCRIP"))
> > //,iif(::oRadioMenu1:nIndex == 3,"BYDESCRIP""))
> > END
> > RETURN Nil
> >
> > METHOD Buscar() CLASS TBuscar /////// este Methodo lo ejecuto desde
el
> > Evento onchange del TEdit(::oEdDescrip)
> > LOCAL lDone
> > with object ::oForm:oDSEquipos //:Locate(::oEdDescrip:Value,.T.)
> > if !:lOpen
> > :lOpen := .T.
> > EndIf
> > ::oBrFind:aCols[2]:cFilter := alltrim(::oEdDescrip:Value)
> > ::oBrfind:Refresh(.t.)
> > END
> >
> > RETURN NIL
> >
> > Ahora bien,, no me funciona esto. Tambien hay algo curioso, cuando hago
> la
> > llamada a este formulario donde buscare de la forma que te explico, se
> > mantienen los datos filtrados como lo tengo en el formulario llamante,,
> > quito el filtro de varias formas y nada,, dbclearFilter(),
> > ::oDSEquipos:CliearFilter(), Set Filter to,, y nada me hace que muestre
> los
> > datos sin filtrado....... can you help please???
> >
> > GRacias de ante manos
> >
> > "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el
mensaje
> > news:42ad3540$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > > Carlos,
> > >
> > > En el evento OnChange del TEdit establecer el filtro en el Browse. No
es
> > muy
> > > complicado.
> > >
> > > Un saludo,
> > >
> > > "Carlos Cedeño Vera" <carlos@labodegadeclimas.com> escribió en el
> mensaje
> > > news:42aa2b23$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> > > > Saudos a todos
> > > >
> > > > Sucede, que tengo un TEdit donde voy tecleando el nombre de un
> producto
> > x,
> > > > cada vez que que teclee una letra quiero que se vaya mostrando en un
> > brow
> > > > los nombres de los productos que van coincidiendo con lo que voy
> > tecleando
> > > > el el TEdit.
> > > >
> > > > Por favor, si alguien tiene un pequeño ejemplo, le estare
eternamente
> > > > agradecido. no tengo la menor idea de como hacerlo,, please help
> > > >
> > > > Gracias de antemanos
> > >
> > >
> >
> >
>
>