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
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