Como puedo hacer una consulta por cual quier letra

[esimon]

Muy Buen Día.

Quiero hacer una consulta donde el usuario tenga la facilidad de consultar un registro por cualquier letra.

mucha gracias

[marcoszorrilla]

Supongo que quieres decir un campo, no?.

Puede ser, si es que entiendo bien tu petición, que utilizando SQL y la claúsula

Código SQL [-]
Like 

lo resuelvas.

Un Saludo.

[Neftali [Germán.Estévez]]

¿Te puedes explicar un poco mejor? ¿En algun campo concreto? ¿Todos los que empiecenpor un letra? ¿los que contengan la letra?

[esimon]

gracias por la información, lo que pasa es que tengo varios campos como son:

• convenio
  organizacion
  pais geografia
  tipo servios
  Acuerdo

por cualquiera de esto campos que el usuario por el cual yo quiera buscar.

esta bien el problema es que me dicen que no puedo buscar en un mismo Query por diferente campos.

pero esta bien, como puedo hacer un Query para cuando yo este escribiendo en un edit me baya mostrando el resultado en un DBGrids

[marcoszorrilla]

Pues lo que tienes que hacer es construir la sentencia SQL al vuelo, por ejemplo:
Una Columna con los campos
Otra con los signos = > < Like ....
El usuario elige marcando campo y operador a aplicar, luego simplemente es añadir AND a la hora de concatener la sentencia.

Un Saludo.

[jjorell]

Hola! La verdad No se si te he logrado entender la consulta, pero entiendo que necesitas tener una especie de filtro y que puedas seleccionar registros en base a uno o varios campos segun el usuario lo desee. Bueno si es asi, tal vez te pueda servir este ejemplo:

Teniendo una ventana y combos por cada uno de los campos a filtrar, puedes poner un codigo como este:

Código Delphi [-]
 
qGAnaAcuMst.close;
qGAnaAcuMst.SQL.Clear;
qGAnaAcuMst.sql.add('SELECT * FROM muestras WHERE FecInicial=:fecInicial AND FecFinal=:fecFinal ');
qGAnaAcuMst.paramByName('fecInicial').asDateTime := eFechaMin.Date;
qGAnaAcuMst.paramByName('fecFinal').asDateTime := eFechaMax.date;
if (trim(cbCosechas.text) <> 'Todas') and (Trim(cbCosechas.text)<>'')
then begin
 qGAnaAcuMst.sql.add(' and Cosecha = :cosecha');
        qGAnaAcuMst.paramByName('cosecha').asString := cbCosechas.text;
end;

if cbTipMuestra.text <> 'Todos'
then begin
 qGAnaAcuMst.sql.add(' and SubProducto = :subproducto');
        qGAnaAcuMst.paramByName('subproducto').asString := cbTipMuestra.text;
end;
qGAnaAcuMst.sql.add('group by Cosecha');
qGAnaAcuMst.open;

Espero que este codigo te ayude.