PDA

Ver la Versión Completa : como utilizar valor de un Qexpr


oscarac
14-03-2011, 06:28:36
Buenas Madrugadas


estoy usando quickreport y en los totales tengo un problema
estoy utilizando Qexpre para calcular la suma de una columa

esto es lo que dice la expression


FORMATNUMERIC(',0.00',Sum(IA))


antes de imprimir quiero determinar en que posicion ira la suma... si es una suma positiva ira en un lado y si es negativa ira en otro


procedure TqrBalanceComprobacionMensual.SummaryBand1BeforePrint(
Sender: TQRCustomBand; var PrintBand: Boolean);
var _SID, _SIA, _SRD, _SRA :Extended;
begin
_SID := strtoint(qeSUMID.Value.strResult);
_SIA := strtoint(qeSUMIA.value.strResult);
_SRD := strtoint(qeSUMRD.value.strResult);
_SRA := strtoint(qeSUMRA.value.strResult);
if _SID - _SIA > 0 then
QRExpr17.Left := QRExpr19.Left
else
QRExpr17.Left := QRExpr20.Left;
if _SRD - _SRA > 0 then
QRExpr18.Left := QRExpr21.Left
else
QRExpr18.Left := QRExpr22.Left;
end;

pero me sale un mensaje de error que dice


EconvertError with Message "48,467.31" is no a valid floating ponti value

que estoy haciendo mal?

gracias anticipadamente