Bueno ya que meti las patas en la primera tengo derecho a repetir, asi aprendo:
Código Delphi
[-]
AdoTable1.Fields.FieldByName('CantDesp').AsFloat :=Strtofloat(Data.Cells[6,Fila]);
Me parece que si viene de StrToFloat debe venir de string, ya que hace la transformacion.
Código Delphi
[-]
AdoTable1.Fields.FieldByName('CantDesp').AsString :=Strtofloat(Data.Cells[6,Fila]);
Saludos