Tengo una bd SQLite en la que hay definido varios campos decimales. Capturo los datos en las celdas de un DBGrid, el primer dato número corresponde a un integer que captura sin problemas, estos aparecen en la celda del campo siguiente, lleva asociado un evento OnChange, ya que al introducir un número da un mensaje diciendo que 12 no es un Float. Este es el código.<div>
<br></div><div><div>procedure TfrmPedVen.ZqryLinPedvpesoChange(Sender: TField);</div><div>begin</div><div>   if (dbgLinFac.DataSource.DataSet.FieldByName('bultos').AsInteger <> null) and (dbgLinFac.DataSource.DataSet.FieldByName('peso').AsInteger <> null) then</div>
<div>     begin</div><div>       dbgLinFac.DataSource.DataSet.FieldByName('cantidad').AsFloat := dbgLinFac.DataSource.DataSet.FieldByName('bultos').AsInteger * dbgLinFac.DataSource.DataSet.FieldByName('peso').AsFloat;</div>
<div>       dbgLinFac.DataSource.DataSet.FieldByName('precio').AsFloat :=  ZqryArt.FieldByName('pv').AsFloat;</div><div>       dbgLinFac.DataSource.DataSet.FieldByName('importe').AsFloat := dbgLinFac.DataSource.DataSet.FieldByName('cantidad').AsFloat * dbgLinFac.DataSource.DataSet.FieldByName('pv').AsFloat;</div>
<div>       dbgLinFac.DataSource.DataSet.FieldByName('num_serie').AsString := cbxSerie.Text + edNum.Text;</div><div>     end;</div><div>end;       </div></div><div><br></div><div>El error salta en la celda que captura el peso.</div>
<div><br></div><div>Saludos y muchas gracias.</div>