trabajo bajo Interbase5, tengo la siguiente codificación:
Código Delphi
[-]
with ActPieza,sql do begin
clear;
Add('update piezas set ');
Add('tipom = ' +QuotedStr(TmpPzOfTIPOM.AsString));
Add(', tcorte = ' +QuotedStr(FloatToStr(Round(TimeStrToSeg(TmpPzOfTCP.AsString)))));
Add(', largo = ' +QuotedStr(tmpPzOfLARGO.AsString));
Add(', ancho = ' +QuotedStr(tmpPzOfANCHO.AsString));
Add(', tratmto = ' +QuotedStr(tmpPzOfTRATMTO.AsString));
Add(', notas = ' + QuotedStr(tmpPzOfNOTAS.AsString));
Add(', tipo = 0');
if Application.MessageBox('Pieza encontrada, ¿Desea cambiar su precio?','Pieza Existente',mb_IconQuestion +
mb_YesNo) = IdYes then
begin
Add(', pu = ' + QuotedStr(FormatFloat('0.00',tmpPzOfVPU.AsVariant))); end;
Add(' where ref_n = ' +QuotedStr(RefStr));
ExecSql
Cuando miro la BD el campo 'pu' de tipo float me aparece el numero sin decimales: 20732838383.
¿Cómo puedo convertirlo a decimales?