diff --git a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas
index 42de6d04..90565e74 100644
--- a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas	
@@ -220,7 +220,7 @@ begin
     HideHourglassCursor;
   end;
   if bEsNuevo then
-    ShowInfoMessage('El Presupuesto se ha dado de alta con el código ' + FPresupuesto.REFERENCIA);
+    ShowInfoMessage('El presupuesto se ha dado de alta con el código ' + FPresupuesto.REFERENCIA);
 
   Modified := False;
 end;
@@ -357,6 +357,7 @@ begin
     if Assigned(FViewPresupuesto) then
     begin
       FViewPresupuesto.Presupuesto := FPresupuesto;
+      ViewPresupuesto.ViewClientePresupuesto.OnClienteChanged := NIL;
       ViewPresupuesto.ViewClientePresupuesto.Cliente := FPresupuesto.Cliente;
       ViewPresupuesto.ViewClientePresupuesto.OnClienteChanged := OnClienteChanged;
       frViewDetallesPresupuestoCliente1.Detalles := FPresupuesto.Detalles;