Código Delphi [-] precio1:=datos.sqlproductos.FieldByName('PRECIO1').AsCurrency;
precio1:=datos.sqlproductos.FieldByName('PRECIO1').AsCurrency;
Código Delphi [-] precio1:=datos.sqlproductosPRECIO1.Value;
precio1:=datos.sqlproductosPRECIO1.Value;