From 6573f39dba0c9d93df19bf4a16a07bf67d1d0108 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Tue, 2 Jun 2009 16:21:23 +0000
Subject: [PATCH] =?UTF-8?q?Limpieza=20de=20c=C3=B3digo?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@952 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 .../uViewDatosYSeleccionClienteFacturaCliente.pas  | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas b/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas
index 5dc4cbf9..cc242d21 100644
--- a/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas	
+++ b/Source/Modulos/Facturas de cliente/Views/uViewDatosYSeleccionClienteFacturaCliente.pas	
@@ -81,9 +81,6 @@ type
   private
     FOnClienteChanged : TNotifyEvent;
     FMsgElegirCliente: String;
-    function GetMsgElegirCliente: String;
-    procedure SetMsgElegirCliente(const Value: String);
-
   protected
     FClientesController : IClientesController;
     FDireccionesController : IDireccionesContactoController;
@@ -277,11 +274,6 @@ begin
     Result := FCliente.ID;
 end;
 
-function TfrViewDatosYSeleccionClienteFacturaCliente.GetMsgElegirCliente: String;
-begin
-  //
-end;
-
 procedure TfrViewDatosYSeleccionClienteFacturaCliente.SetCliente(Value: IBizCliente);
 begin
   FCliente := Value;
@@ -312,12 +304,6 @@ begin
   Self.Cliente := IBizCliente(FClientesController.Buscar(Value));
 end;
 
-procedure TfrViewDatosYSeleccionClienteFacturaCliente.SetMsgElegirCliente(
-  const Value: String);
-begin
-  //
-end;
-
 function TfrViewDatosYSeleccionClienteFacturaCliente.GetOnClienteChanged: TNotifyEvent;
 begin
   Result := FOnClienteChanged;