roberto
8679a9bc04
git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@2 93f398dd-4eb6-7a46-baf6-13f46f578da2
29 lines
687 B
ObjectPascal
29 lines
687 B
ObjectPascal
unit uIDataModuleUsuarios;
|
|
|
|
interface
|
|
|
|
uses
|
|
UCBase, UCSettings, uBizUsuarios;
|
|
|
|
type
|
|
IDataModuleUsuarios = interface
|
|
['{C0A8481F-4920-414D-A906-EE1EB18DE946}']
|
|
procedure InicializarUserControl (AUserControl : TUserControl);
|
|
|
|
function GetUsuario(const ID : Integer) : IBizUsuario;
|
|
function NuevoUsuario : IBizUsuario;
|
|
function GetUsuarios : IBizUsuario;
|
|
|
|
function NuevoPerfil : IBizPerfilUsuario;
|
|
function GetPerfiles : IBizPerfilUsuario;
|
|
function GetPerfil(const ID : Integer) : IBizPerfilUsuario;
|
|
|
|
function Login(const AUser: String; const APassword: String): Boolean;
|
|
procedure Logout;
|
|
end;
|
|
|
|
implementation
|
|
|
|
end.
|
|
|