Código Delphi [-]Query1.Sql.text:= 'Select sum(tutabla.tipo) as sumaT where tipo = :dat'; Query1.paramaters[0].Value:= // de donde hagas la comparacion. Query1.Open;
Query1.Sql.text:= 'Select sum(tutabla.tipo) as sumaT where tipo = :dat'; Query1.paramaters[0].Value:= // de donde hagas la comparacion. Query1.Open;