Saludos Club, traigo algo que es común pero que no logro entender (Soy novato
), tengo este error pero no solo quiero que me expliquen como resolverlo sino porque ocurre para evitarlo en el futuro.
este es el código:
Código Delphi
[-]
var
i : integer;
begin
For i:=1 to SG.RowCount-1 do
SubTotal := SubTotal + StrToFloat(SG.Cells[4,i]);
For i:=1 to SG.RowCount-1 do
If SG.Cells[5,i] = 'Si' then Impuesto := Impuesto + StrToFloat(SG.Cells[4,i]);
SubTotal := Round(SubTotal);
Desc := (SubTotal * PorcDesc.Value / 100);
Desc := Round(Desc);
Impuesto := Impuesto * 0.18;
Impuesto := Round(Impuesto);
Total := (SubTotal - Desc + Impuesto);
SGT.Cells[1,1] := Format('%8.2n',[desc]);
SGT.Cells[1,2] := Format('%8.2n',[Impuesto]);
SGT.Cells[1,0] := Format('%8.2n',[SubTotal]);
SGT.Cells[1,3] := Format('%8.2n',[Total]);
end;
me da error cuando en el StringGrid tengo cantidades en Formato 1,234.00 por el asunto de la coma, como lo resuelvo y porque pasa?
Gracias