Código Delphi [-] procedure TDataModule7.Query8CalcFields(DataSet: TDataSet); begin Query8Cantidad.Value.asinteger:=Form6.Edit1.Text; // no va Query8Total.value:=(Query8Cantidad.value*Query8Precio_unitario.value); // si va end;
procedure TDataModule7.Query8CalcFields(DataSet: TDataSet); begin Query8Cantidad.Value.asinteger:=Form6.Edit1.Text; // no va Query8Total.value:=(Query8Cantidad.value*Query8Precio_unitario.value); // si va end;