Limpieza de código
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@952 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
9258ece3fd
commit
6573f39dba
@ -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;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user