mmmmm
si ya tienes una consulta para mostrar las ventas del dia, te recomentaria mejor crear una consulta similar la cual te sume las ventas del dia
imaginemos que tu consulta es asi
Código Delphi
[-]
Select TipoDOC, Documento, Fecha, Cliente, Total From TablaVentas where
Fecha = :Fecha
podrias crear esta consulta que te sume las ventas del dia
Código Delphi
[-]
Select Sum (Total) As Total From TablaVentas where
Fecha = :Fecha
asocias un datasource al nuevo query y muestras esa informacion en un tdblabel