Problema: type variant en campo a calcular

[Nicolas_2011]

Buenas foreros vengo con un problema q no eh podido resolver el tema es el siguiente tengo un detalle de compras (una grilla) en la cual van el nombre del producto a compra el precio la cantidad y el subtotal. esta grilla se carga atravez de un boton seleccionar q se encuentra en un listado de productos en dicho boton seleccionar al apretarlo deberia calcular el subtotal de la grilla el codigo lo tengo algo asi(solo la parte q refiere a mi problema:

Código Delphi [-]
procedure Tflistadoproducto.bseleccionarClick(Sender: TObject); 
begin 
DBsubtotal.Text := FloatToStr(cant*Fmodulo.Qproducto['precio']); 
Fmodulo.Tdetallefactura ['Subtotal'] := StrToFloat(DBsubtotal.Text); 
end;

y el error que tira dice esto en tiempo de ejecucion..
cannot access filed "subtotal" as type variant.

Ayuda por favor!