problemas con el query

[juangabriel1786]

Hola mi Nombre es juan gabriel, trato de hacer una consulta con el Query y me funciona, pero ok me trae los datos al DBgrid, pero lo que realmente necesito es saber si el query encontro lo que busca,, para asi poder tomar deciciones aqui esta el codigo que uso.

ejemplo: Se le pasa un valor, lo encontro ok, decirle al usuario, olle ese codigo ya existe no puede introducirlo de nuevo.
Y si no fue encontrado,guardar los datos.

Query1.open;
Query1.close;
Query1.ParamByName('buscar').AsInteger:=Strtoint(Edit1.Text);
Query1.open;