Busqueda en Tablas

[NeoX]

Hola que tal, Mi situacion es la Siguiente:

Tengo una tabla Fija con mas de 2000 registros de la cual hay 3 campos:

Cintura        Peso        % Grasa
  55              56              4 
  55              57              3
  55              58              2
  55              59              2
  57              56              4
  57              57              3

Entonces, el usuario debe de dar en Edits la Cintura y el Peso y automaticamente al darle a un Boton, muestre el valor de su porcentaje de Grasa.

Yo se hacer una busqueda pero solo con un elemento (El campo llave), lo que no se y no he podido es hacer las Busqueda con 2 elementos, ejemplo:

El usuario teclea en los Edits 57 y 56 de Cintura y Peso respectivamente entonces al dar click en un Boton nos tiene que mostrar un "4".

Espero haberme explicado bien y ojala que alguien me pueda ayudar.

[marcoszorrilla]

En general la búsqueda en tablas puede hacerse por más de un campo, bien porque éstas están indexadas de esta manera, es decir por más de un campo a la vez (índice compuesto), o símplemente utilizando un Locate.

Un Saludo.

[NeoX]

Gracias por la pronta respuesta... Nada mas un ultimo favor si es posible... Me podrias proporcionar la parte del codigo que haria eso para terminar de orientarme. Sobre todo con el uso del Locate.

[marcoszorrilla]

De la propia ayuda de Delphi:

Código Delphi [-]
with CustTable do
  Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver', 'P', '408-431-1000']), [loPartialKey]);

Un Saludo.

[[Caral]]

Hola Neox
Con una sentencia sql en el boton en el evento onclick:

Código SQL [-]
QTemp.SQL.Text := 'Select Cintura, Peso From TUTABLA where Cintura = '+
                         Edit1.Text+' And Peso = '+Edit2.Text+';

con el resultado en un dbedit obtendras el numero que buscas.
Saludos

[tarditir]

tengo un problema con un ADOtable
Las conecciones estan bien veo los datos en en DBgrid
pero tengo un problema al kerer habrir la tabla nose como invocarla
y cuando kiero hacer algun cambio en la base me da error de q no encuentra el campo ej"nombre" q si tengo en la tabla--

corregime x favor nose si se hace asi

opendatabase("c:\base.mdb")

helpP!