Error al insertar datos a una consulta
Buenas gente estoy tratando de agregar los datos a una consulta y al ejecutarla me dice que la consulta esta vacía este es el código que estoy usando
Código Delphi [-]fmodulo.Qtotal.Close;
fmodulo.Qtotal.SQL.Clear;
fmodulo.Qtotal.SQL.Text := 'Select SUM(Precio_v) As Total FROM detalles_venta Where detalles_venta.estado = 1 and detalles_venta.id_detalle = :idv';
fmodulo.Qtotal.ParamByName('idv').AsInteger := numventap;
fmodulo.Qtotal.ExecSQL;
fmodulo.Qtotal.Refresh;
__________________
We are told to remember the idea, not the man, because a man can fail. He can be caught, he can be killed and forgotten, but 400 years later, an idea can still change the world.
|