Yo creo que debiera funcionar, pero prueba así:
Código Delphi
[-]query1.ParamByName('buscar').AsString:=edit1.Text;
Este código ponlo en un botón y lo ejecutas en el evento OnClick, puede ser que donde lo tienes situado por algún motivo no salta el evento y no se ejecute de esta manera sabremos si es así.
Un Saludo.