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

[juanelo]

Que tal,
Probablemente tengas en tiempo de diseño cargados los campos en el query, haz una prueba, dale doble click a tu componente query y checate que este vacía.
Saludos

[Petolansa]

Graias por la observacion juanelo, pero no, no estan cargados, esta vacio!
que mas podria ser?

[ContraVeneno]

Es que son parámetros, no campos...
en lugar de:

Código Delphi [-]
query1.FieldByName('numfac').AsFloat:=strtofloat(edit1.Text);
QUERY1.FieldByName('tipofac').AsString:=tipofactu;

Debería ser:

Código Delphi [-]
query1.ParamByName('numfac').AsFloat:=strtofloat(edit1.Text);
QUERY1.ParamByName('tipofac').AsString:=tipofactu;

[juanelo]

Upps!! tiene toda la razon contraveneno ...

PD: ¿Era capciosa la pregunta?

[[egostar]]

Empezado por juanelo

Upps!! tiene toda la razon contraveneno ...

PD: ¿Era capciosa la pregunta?

Vaya, pues si, por ahí debemos comenzar, la costumbre de no leer.

Salud OS

[[egostar]]

Hola Petolansa

Esto sucede porque estas creando la consulta en tiempo de ejecución, te recomiendo que hagas lo siguiente

En la propiedad SQL de tu query pon tu consulta

Código SQL [-]
Select * from factura
where numfactura = :numfac and tipofac = :tipofac

Ejecuta tu programa y dinos que pasa.

Salud OS