diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.dfm b/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.dfm
index 0a9e0fb6..304e67b5 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.dfm	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.dfm	
@@ -83,12 +83,11 @@ inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente
     inherited cxGridView: TcxGridDBTableView
       inherited cxGridViewREFERENCIA_PROVEEDOR: TcxGridDBColumn
         DataBinding.FieldName = ''
-        Visible = False
-        VisibleForCustomization = False
       end
     end
   end
   inherited TBXDock1: TTBXDock
     Top = 95
+    ExplicitTop = 68
   end
 end
diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.pas
index 9e5c00d5..c8311ccd 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.pas	
@@ -25,7 +25,6 @@ type
   end;
 
   TfrViewDetallesPresupuestoCliente = class(TfrViewDetallesArticulosParaVenta, IViewDetallesPresupuestoCliente)
-    procedure BitBtn1Click(Sender: TObject);
   protected
     FPresupuesto: IBizPresupuestoCliente;
     function GetPresupuesto: IBizPresupuestoCliente;
@@ -56,12 +55,6 @@ begin
   (Controller as IDetallesPresupuestoClienteController).AnadirArticulos(Detalles, Presupuesto.Cliente);
 end;
 
-procedure TfrViewDetallesPresupuestoCliente.BitBtn1Click(Sender: TObject);
-begin
-  inherited;
-  FPresupuesto.Detalles.Insert;
-end;
-
 function TfrViewDetallesPresupuestoCliente.GetPresupuesto: IBizPresupuestoCliente;
 begin
   Result := FPresupuesto;