From 7b5a20b77197644dea681dd4fa6589d9f796d54c Mon Sep 17 00:00:00 2001 From: david Date: Wed, 20 Aug 2008 15:17:37 +0000 Subject: [PATCH] Presupuestos de cliente: corregido error en texto de mensaje. git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@520 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- .../Views/uEditorPresupuestoCliente.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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;