Ver Mensaje Individual
  #2  
Antiguo 20-11-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.043
Reputación: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Creo que te he recomendado alguna vez un libro con el que serías un "maestro" en delphi con bases de datos. Es este.
No puedes "insertar" en una "consulta". Una consulta es una consulta, y un insert es un insert.
Código Delphi [-]
fmodulo.Qtotal.Close;
// fmodulo.Qtotal.SQL.Clear;   -> no sirve
fmodulo.Qtotal.SQL.Text := 'Select SUM(Precio_v) As Total FROM detalles_venta Where detalles_venta.estado = 1 and detalles_venta.id_detalle = :idv';  // -> ¿Falta group by
fmodulo.Qtotal.ParamByName('idv').AsInteger := numventap;
// fmodulo.Qtotal.ExecSQL;   -> si es un "insert", entonces execsql. Si es un select, entonces "open"
fmodulo.Qtotal.Open  // --> "open" si es un select
// fmodulo.Qtotal.Refresh;  -> no sirve
Todo esto sin saber qué componentes usas, base de datos, ni nada.
Responder Con Cita