Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Busqueda segun seleccion y asigancion de fecha a un DBEdit. (https://www.clubdelphi.com/foros/showthread.php?t=22328)

JoanKa 12-06-2005 18:28:47

Busqueda segun seleccion y asigancion de fecha a un DBEdit.
 
Bueno, gracias por la atencion prestada.

Les cuento que tengo un formulario conformado por :
4 radiobuttom (rb_codigo, rb_nombre, rb_direccion, rb_encargado)
1 TEdit (txt_buscar)
1 DBGrid.

Ahora como podria hacer para buscar segun el radio button seleccionado, y asi mismo que en el DBGrid valla mostrando conforme se valla ingresando en el txt_buscar, como por ejemplo al seleccionar el rb_nombre ,coloco en el txt_buscar la letra "J" y en el DBGrid me valla mostrando todos los registros que empiecen por J y conforme siga escribiendo me valla mostrando los nombres segun en el txt_buscar halla colocado.

Estuve viendo algo

consulta := 'SELECT * FROM CLIENTES WHERE RADIO_BUTTOM_SELECCIONADO LIKE ''';
consulta := consulta + '%';
consulta := consulta + txt_buscar;
consulta := consulta + '%';
consulta:=consulta + '''';
consulta:=consulta + ' ORDER BY RADIO_BUTTOM_SELECCIONADO ';
QUERY1.SQL.Clear;
QUERY1.SQL.ADD(consulta);
QUERY1.Active := TRUE;
QUERY1.Open

RADIO_BUTTOM_SELECCIONADO (Como podria decirle que me busque por el campo que he seleccionado)

Me parece que el evento onchange del txt_buscar debo colocar esto o en donde ???????


* Otra cosa: Como podria asignarle la fecha del PC a un DBEDIT (es decir al momento de abrir un formulario, eel DBedit de estar puesto la fecha de PC en el formato dd/mm/yyyy).


Gracias y Saludos a Todos.

marcoszorrilla 12-06-2005 21:29:28

Si quieres hacer una búsqueda de tipo incremental debes de lanzar la consulta cada vez que tecleen una letra en el edit.

Si por el contrario tienes un Ttable conectado a los datos y a la rejilla y el campo de búsqueda indexado, lanzarías un FindNearest.

En cuanto a la fecha, debes de utilizar el evento OnNewRecord del campo que convenga:
Código Delphi [-]
 MiCampoFecha:=Date;

Un Saludo.


La franja horaria es GMT +2. Ahora son las 00:17:09.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi