Query no me devuele datos

[Petolansa]

Buenas gente, vuelvo a requerir de un poco de su atencion para ver si me pueden ayudar con lo siguiente.
Es una consulta simple, lo que quiero hacer es lo siguiente.
Tengo un form, el cual tiene dos radio button para elegir el tipo de factura y un edit para ingresar un numero, en este caso un nro de factura.
Tengo un query que lo que quiero que haga es que me devuelva los datos generales de la factura y me los meustre en un dgdrid.
Utilizo la siguiente consulta pero lo que hace una vez que ingrese los datos anteriores y le doy click al boton de buscar factura, me dice query1 numfac not found.

Código Delphi [-]
procedure TFrmanularfactura.BitBtn1Click(Sender: TObject);
begin
if rba.Checked=true then tipofactu:='a' else
if rbb.Checked=true then tipofactu:='b';

numfactu:=strtofloat(edit1.Text);

query1.Close;
query1.SQL.Clear;
query1.SQL.Add('Select * from factura');
query1.SQL.Add('where factura.numfactura=:numfac AND Factura.tipofac=:tipofac');
query1.FieldByName('numfac').AsFloat:=strtofloat(edit1.Text);
QUERY1.FieldByName('tipofac').AsString:=tipofactu;
query1.Open;
end;
end.

Tengo un query un datasource y un dbgrid, todo conectados como corresponde.
El campo (numfactura) de la tabla factura es de tipo float y el tipo de factura (tipofac) es string, ya que es o A o B.
EN la propiedad params los defini como corresponde segun su tipo.

Porque me pude dar ese error.
Gracias