From 1209b0c0fc0e14bb86236d014faad8bad55f24c0 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Mon, 12 May 2008 16:34:11 +0000
Subject: [PATCH] Limpieza de ficheros.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@370 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 .../Usuarios/Views/uUsuarios.pas              | 89 -------------------
 1 file changed, 89 deletions(-)
 delete mode 100644 Source/ApplicationBase/Usuarios/Views/uUsuarios.pas

diff --git a/Source/ApplicationBase/Usuarios/Views/uUsuarios.pas b/Source/ApplicationBase/Usuarios/Views/uUsuarios.pas
deleted file mode 100644
index 9b355e6f..00000000
--- a/Source/ApplicationBase/Usuarios/Views/uUsuarios.pas
+++ /dev/null
@@ -1,89 +0,0 @@
-unit uUsuarios;
-
-interface
-
-uses
-  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
-  Dialogs, DB, uDADataTable, dbcgrids, uDataModuleUsuarios, StdCtrls,
-  DBCtrls, JvExControls, JvComponent, JvNavigationPane,
-  Grids, DBGrids, ActnList, uDAInterfaces;
-
-type
-  TfUsuarios = class(TForm)
-    DADataSource: TDADataSource;
-    Grid: TDBGrid;
-    JvNavPanelHeader1: TJvNavPanelHeader;
-    Button1: TButton;
-    Button2: TButton;
-    Button3: TButton;
-    Button4: TButton;
-    Button5: TButton;
-    ActionList: TActionList;
-    actCerrar: TAction;
-    actNuevo: TAction;
-    actCambiarPassword: TAction;
-    actModificar: TAction;
-    actEliminar: TAction;
-    procedure actCerrarExecute(Sender: TObject);
-    procedure FormCreate(Sender: TObject);
-    procedure actEliminarUpdate(Sender: TObject);
-    procedure actModificarUpdate(Sender: TObject);
-    procedure actCambiarPasswordUpdate(Sender: TObject);
-    procedure actNuevoUpdate(Sender: TObject);
-  private
-    { Private declarations }
-  public
-    { Public declarations }
-  end;
-
-procedure AdministrarUsuarios;
-
-implementation
-
-{$R *.dfm}
-
-
-procedure AdministrarUsuarios;
-var
-  fUsuarios: TfUsuarios;
-begin
-  fUsuarios := TfUsuarios.Create(NIL);
-  try
-    fUsuarios.ShowModal;
-  finally
-    fUsuarios.Free;
-  end;
-end;
-
-procedure TfUsuarios.actCerrarExecute(Sender: TObject);
-begin
-  Close;
-end;
-
-procedure TfUsuarios.FormCreate(Sender: TObject);
-begin
-{  DADataSource.DataTable := dmUsuarios.tbl_Usuarios;
-  DADataSource.DataTable.Active := True;}
-end;
-
-procedure TfUsuarios.actEliminarUpdate(Sender: TObject);
-begin
-  (Sender as TAction).Enabled := not (DADataSource.DataTable.IsEmpty);
-end;
-
-procedure TfUsuarios.actModificarUpdate(Sender: TObject);
-begin
-  (Sender as TAction).Enabled := not (DADataSource.DataTable.IsEmpty);
-end;
-
-procedure TfUsuarios.actCambiarPasswordUpdate(Sender: TObject);
-begin
-  (Sender as TAction).Enabled := not (DADataSource.DataTable.IsEmpty);
-end;
-
-procedure TfUsuarios.actNuevoUpdate(Sender: TObject);
-begin
-  (Sender as TAction).Enabled := Assigned(DADataSource.DataTable);
-end;
-
-end.