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.

Busqueda Incremental

Foro de Xailer profesional en español
Responder
Pablo Herranz
Mensajes: 253
Registrado: Lun Feb 07, 2005 1:20 pm

Busqueda Incremental

Mensaje por Pablo Herranz »

Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que hiciste
en el curso sobre un dbdataset y un dbbrowse?
Gracias
Pablo
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9253
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Busqueda Incremental

Mensaje por ignacio »

Pablo,
Es super faci. Simplemente escribe el evento OnSeek del browse:
METHOD BrwSeek( oSender, cSeek ) CLASS TForm1
RETURN ::oDataSet:Seek( Upper( cSeek ) )
Y designa el control que recibirá el valor de la actual búsqueda
incremental:
::oBrw:oSeek := ::oLabel
Y ya está. Actualmente el oSeek hay que introducirlo por código, pero acabo
de modificarlo para que también se puede hacer desde el IDE.
Te mando con este email el ejemplo DbfData2 modificado con búsqueda
incremental.
Un saludo
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:4231682d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que hiciste
> en el curso sobre un dbdataset y un dbbrowse?
>
> Gracias
> Pablo
>
>


Attached files DbfTest.zip (17.1 KB)Â
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Pablo Herranz
Mensajes: 253
Registrado: Lun Feb 07, 2005 1:20 pm

Busqueda Incremental

Mensaje por Pablo Herranz »

Funciona perfecto, pero no entiendo una cosa
::oBrw:oSeek := ::oLabel
se supone que oLabel esta vacio, ¿no es mas logico ::oLabel::oBrw:oSeek ?,
simple curiosidad
Saludos
Pablo
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:4231718e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Pablo,
>
> Es super faci. Simplemente escribe el evento OnSeek del browse:
>
> METHOD BrwSeek( oSender, cSeek ) CLASS TForm1
>
> RETURN ::oDataSet:Seek( Upper( cSeek ) )
>
> Y designa el control que recibirá el valor de la actual búsqueda
> incremental:
>
> ::oBrw:oSeek := ::oLabel
>
> Y ya está. Actualmente el oSeek hay que introducirlo por código, pero
> acabo de modificarlo para que también se puede hacer desde el IDE.
>
> Te mando con este email el ejemplo DbfData2 modificado con búsqueda
> incremental.
>
> Un saludo
>
> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
> news:4231682d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que
>> hiciste
>> en el curso sobre un dbdataset y un dbbrowse?
>>
>> Gracias
>> Pablo
>>
>>
>
>
>
Pablo Herranz
Mensajes: 253
Registrado: Lun Feb 07, 2005 1:20 pm

Busqueda Incremental

Mensaje por Pablo Herranz »

Queria decir ::oLabel:=::oBrw:oSeek
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:[email=42318626@ozsrv2.ozlan.local...]42318626@ozsrv2.ozlan.local...[/email]
> Funciona perfecto, pero no entiendo una cosa
> ::oBrw:oSeek := ::oLabel
> se supone que oLabel esta vacio, ¿no es mas logico ::oLabel::oBrw:oSeek
> ?, simple curiosidad
>
> Saludos
> Pablo
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:4231718e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Pablo,
>>
>> Es super faci. Simplemente escribe el evento OnSeek del browse:
>>
>> METHOD BrwSeek( oSender, cSeek ) CLASS TForm1
>>
>> RETURN ::oDataSet:Seek( Upper( cSeek ) )
>>
>> Y designa el control que recibirá el valor de la actual búsqueda
>> incremental:
>>
>> ::oBrw:oSeek := ::oLabel
>>
>> Y ya está. Actualmente el oSeek hay que introducirlo por código, pero
>> acabo de modificarlo para que también se puede hacer desde el IDE.
>>
>> Te mando con este email el ejemplo DbfData2 modificado con búsqueda
>> incremental.
>>
>> Un saludo
>>
>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>> news:4231682d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>> Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que
>>> hiciste
>>> en el curso sobre un dbdataset y un dbbrowse?
>>>
>>> Gracias
>>> Pablo
>>>
>>>
>>
>>
>>
>
>
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9253
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Busqueda Incremental

Mensaje por ignacio »

Pablo,
Entiendo que no, la propiedad oSeek del control oBrowse permite indicar que
control refrescar con la búsqueda incremental, es decir, el control a
refrescar con la búsqueda incrementel es oLabel, y dicho refresco es
realizado por el control Browse a través de su propiedad oSeek.
Me da igual que oLabel este vacio, de hecho, tiene poco sentido ponerle
ningún valor ya que enseguida la modificará el browse en cuanto toques
cualquier tecla.
Logicamente lo que si es necesario es que el control oLabel este creado
cuando se realice la asignación, por lo tanto, es importante que el label se
cree antes que el browse.
Tu proposición: ::oLabel:=::oBrw:oSeek
No tiene mucho sentido ya que obligaría al Browse a crear un control tipo
Label y asignarselo a la propiedad oSeek. Pero dicho label donde lo creo?,
donde lo muestro? Tiene mucho más sentido que tu crees el Label donde
quieras y luego le indiques al Browse el label que quieres que se actualice.
Un saludo,
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:[email=423189ca@ozsrv2.ozlan.local...]423189ca@ozsrv2.ozlan.local...[/email]
> Queria decir ::oLabel:=::oBrw:oSeek
>
>
> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
> news:[email=42318626@ozsrv2.ozlan.local...]42318626@ozsrv2.ozlan.local...[/email]
>> Funciona perfecto, pero no entiendo una cosa
>> ::oBrw:oSeek := ::oLabel
>> se supone que oLabel esta vacio, ¿no es mas logico ::oLabel::oBrw:oSeek
>> ?, simple curiosidad
>>
>> Saludos
>> Pablo
>>
>> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
>> news:4231718e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>> Pablo,
>>>
>>> Es super faci. Simplemente escribe el evento OnSeek del browse:
>>>
>>> METHOD BrwSeek( oSender, cSeek ) CLASS TForm1
>>>
>>> RETURN ::oDataSet:Seek( Upper( cSeek ) )
>>>
>>> Y designa el control que recibirá el valor de la actual búsqueda
>>> incremental:
>>>
>>> ::oBrw:oSeek := ::oLabel
>>>
>>> Y ya está. Actualmente el oSeek hay que introducirlo por código, pero
>>> acabo de modificarlo para que también se puede hacer desde el IDE.
>>>
>>> Te mando con este email el ejemplo DbfData2 modificado con búsqueda
>>> incremental.
>>>
>>> Un saludo
>>>
>>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>>> news:4231682d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>> Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que
>>>> hiciste
>>>> en el curso sobre un dbdataset y un dbbrowse?
>>>>
>>>> Gracias
>>>> Pablo
>>>>
>>>>
>>>
>>>
>>>
>>
>>
>
>
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Pablo Herranz
Mensajes: 253
Registrado: Lun Feb 07, 2005 1:20 pm

Busqueda Incremental

Mensaje por Pablo Herranz »

Te estoy haciendo perder el tiempo con esto, ya que funciona perfectamente,
pero lo que no entiendo es el sentido de la asignacion
::oBrw:oSeek := ::oLabel
o sea, el contenido de oBrw:oSeek es igual a oLabel, que estara vacio ¿me
entiendes?
Pero vamos que no tiene mayor importancia
Gracias
Pablo
"Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
news:4231bcd5$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Pablo,
>
> Entiendo que no, la propiedad oSeek del control oBrowse permite indicar
> que control refrescar con la búsqueda incremental, es decir, el control a
> refrescar con la búsqueda incrementel es oLabel, y dicho refresco es
> realizado por el control Browse a través de su propiedad oSeek.
>
> Me da igual que oLabel este vacio, de hecho, tiene poco sentido ponerle
> ningún valor ya que enseguida la modificará el browse en cuanto toques
> cualquier tecla.
>
> Logicamente lo que si es necesario es que el control oLabel este creado
> cuando se realice la asignación, por lo tanto, es importante que el label
> se cree antes que el browse.
>
> Tu proposición: ::oLabel:=::oBrw:oSeek
>
> No tiene mucho sentido ya que obligaría al Browse a crear un control tipo
> Label y asignarselo a la propiedad oSeek. Pero dicho label donde lo creo?,
> donde lo muestro? Tiene mucho más sentido que tu crees el Label donde
> quieras y luego le indiques al Browse el label que quieres que se
> actualice.
>
> Un saludo,
>
>
> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
> news:[email=423189ca@ozsrv2.ozlan.local...]423189ca@ozsrv2.ozlan.local...[/email]
>> Queria decir ::oLabel:=::oBrw:oSeek
>>
>>
>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>> news:[email=42318626@ozsrv2.ozlan.local...]42318626@ozsrv2.ozlan.local...[/email]
>>> Funciona perfecto, pero no entiendo una cosa
>>> ::oBrw:oSeek := ::oLabel
>>> se supone que oLabel esta vacio, ¿no es mas logico ::oLabel::oBrw:oSeek
>>> ?, simple curiosidad
>>>
>>> Saludos
>>> Pablo
>>>
>>> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el
>>> mensaje news:4231718e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>> Pablo,
>>>>
>>>> Es super faci. Simplemente escribe el evento OnSeek del browse:
>>>>
>>>> METHOD BrwSeek( oSender, cSeek ) CLASS TForm1
>>>>
>>>> RETURN ::oDataSet:Seek( Upper( cSeek ) )
>>>>
>>>> Y designa el control que recibirá el valor de la actual búsqueda
>>>> incremental:
>>>>
>>>> ::oBrw:oSeek := ::oLabel
>>>>
>>>> Y ya está. Actualmente el oSeek hay que introducirlo por código, pero
>>>> acabo de modificarlo para que también se puede hacer desde el IDE.
>>>>
>>>> Te mando con este email el ejemplo DbfData2 modificado con búsqueda
>>>> incremental.
>>>>
>>>> Un saludo
>>>>
>>>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>>>> news:4231682d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>>> Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que
>>>>> hiciste
>>>>> en el curso sobre un dbdataset y un dbbrowse?
>>>>>
>>>>> Gracias
>>>>> Pablo
>>>>>
>>>>>
>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>
Pablo Herranz
Mensajes: 253
Registrado: Lun Feb 07, 2005 1:20 pm

Busqueda Incremental

Mensaje por Pablo Herranz »

Ya me entere, gracias
Pablo
"Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
news:[email=4231c0e0@ozsrv2.ozlan.local...]4231c0e0@ozsrv2.ozlan.local...[/email]
> Te estoy haciendo perder el tiempo con esto, ya que funciona
> perfectamente, pero lo que no entiendo es el sentido de la asignacion
>
> ::oBrw:oSeek := ::oLabel
>
> o sea, el contenido de oBrw:oSeek es igual a oLabel, que estara vacio ¿me
> entiendes?
>
> Pero vamos que no tiene mayor importancia
>
> Gracias
> Pablo
>
>
> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el mensaje
> news:4231bcd5$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Pablo,
>>
>> Entiendo que no, la propiedad oSeek del control oBrowse permite indicar
>> que control refrescar con la búsqueda incremental, es decir, el control a
>> refrescar con la búsqueda incrementel es oLabel, y dicho refresco es
>> realizado por el control Browse a través de su propiedad oSeek.
>>
>> Me da igual que oLabel este vacio, de hecho, tiene poco sentido ponerle
>> ningún valor ya que enseguida la modificará el browse en cuanto toques
>> cualquier tecla.
>>
>> Logicamente lo que si es necesario es que el control oLabel este creado
>> cuando se realice la asignación, por lo tanto, es importante que el label
>> se cree antes que el browse.
>>
>> Tu proposición: ::oLabel:=::oBrw:oSeek
>>
>> No tiene mucho sentido ya que obligaría al Browse a crear un control tipo
>> Label y asignarselo a la propiedad oSeek. Pero dicho label donde lo
>> creo?, donde lo muestro? Tiene mucho más sentido que tu crees el Label
>> donde quieras y luego le indiques al Browse el label que quieres que se
>> actualice.
>>
>> Un saludo,
>>
>>
>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>> news:[email=423189ca@ozsrv2.ozlan.local...]423189ca@ozsrv2.ozlan.local...[/email]
>>> Queria decir ::oLabel:=::oBrw:oSeek
>>>
>>>
>>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>>> news:[email=42318626@ozsrv2.ozlan.local...]42318626@ozsrv2.ozlan.local...[/email]
>>>> Funciona perfecto, pero no entiendo una cosa
>>>> ::oBrw:oSeek := ::oLabel
>>>> se supone que oLabel esta vacio, ¿no es mas logico
>>>> ::oLabel::oBrw:oSeek ?, simple curiosidad
>>>>
>>>> Saludos
>>>> Pablo
>>>>
>>>> "Ignacio Ortiz de Zúñiga" <InvalidAccount@ozs.com> escribió en el
>>>> mensaje news:4231718e$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>>> Pablo,
>>>>>
>>>>> Es super faci. Simplemente escribe el evento OnSeek del browse:
>>>>>
>>>>> METHOD BrwSeek( oSender, cSeek ) CLASS TForm1
>>>>>
>>>>> RETURN ::oDataSet:Seek( Upper( cSeek ) )
>>>>>
>>>>> Y designa el control que recibirá el valor de la actual búsqueda
>>>>> incremental:
>>>>>
>>>>> ::oBrw:oSeek := ::oLabel
>>>>>
>>>>> Y ya está. Actualmente el oSeek hay que introducirlo por código, pero
>>>>> acabo de modificarlo para que también se puede hacer desde el IDE.
>>>>>
>>>>> Te mando con este email el ejemplo DbfData2 modificado con búsqueda
>>>>> incremental.
>>>>>
>>>>> Un saludo
>>>>>
>>>>> "Pablo Herranz" <pablo@ibertabaco.com> escribió en el mensaje
>>>>> news:4231682d$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>>>>> Ignacio, ¿me podrias mandar el ejemplo de Busqueda incremental que
>>>>>> hiciste
>>>>>> en el curso sobre un dbdataset y un dbbrowse?
>>>>>>
>>>>>> Gracias
>>>>>> Pablo
>>>>>>
>>>>>>
>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>
>>>
>>
>>
>
>
Responder