66,00 no es double ???

[chele]

Ah si ??? juas cada dia me doy mas cuenta de lo poco que se jeje.

Y como le referencio ???

Es decir todo esto lo hago en otro form ... ¿como lo referencio?

[__cadetill]

Bueno, la operación de suma la haces en el OnPrint de un TQrDbText, no?

Si es así, en principio sólo tendrías que poner la linea de código que te he pasado (siempre y cuando suma1 sea de tipo Float)

[__cadetill]

Perdón, la linea anterior tiene un error, tendría que quedar algo así

Código Delphi [-]
if Sender is TQrDbText then
  suma1 := suma1 + TQrDbText(Sender).DataSet.FieldByName(TQrDbText(Sender).DataField).AsFloat;

[chele]

Bua funciona perfecto, gracias