Ok, hecha un vistazo a este ecodigo:
En un Query: // lo llamare qr, o le pones cualquiera
SELECT campos
FROM tabla
WHERE campo
=:campo // sera pasado como parametro
En tu Boton:
clientdataset1.close;
qr.SQL.text:='SELECT *FROM tabla WHERE codigo="'+
strtoint(edit1.text)+'"';
{
es pasado como parametro del query}
clientdataset1..Open;
Y si necesitas validar si existe o no, X registro en tu tabla, agregas un variable de esta forma:
var
options:tlocateoptions;
y en tu codigo agregas:
if not qr.Locate('campo',edit1.text,options) then
messagebox(handle,'Algun mensaje que advierta que no existe tu registro','error',mb_ok);;
edit1.SetFocus; // Colocas tu foco en el edit
edit1.text:=''; // Si deseas borras lo que estuvo mal escrito
Espero te sirva.
Karla
Avisas si fue de ayuda
Por cierto, que Manejador de Base de datos utilizas?