Busqueda segun seleccion y asigancion de fecha a un DBEdit.

[JoanKa]

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]

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.