inherited DataModuleUsuarios: TDataModuleUsuarios OnCreate = DataModuleCreate Height = 284 Width = 468 object srvUsuarios: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvUsuarios' Left = 40 Top = 80 end object UCSettingsSpanish: TUCSettings AppMessages.MsgsForm_BtNew = '&Nuevo Mensaje' AppMessages.MsgsForm_BtReplay = '&Responder' AppMessages.MsgsForm_BtForward = '&Reenviar' AppMessages.MsgsForm_BtDelete = '&Borrar' AppMessages.MsgsForm_BtClose = '&Cerrar' AppMessages.MsgsForm_WindowCaption = 'Mensajes de Sistema' AppMessages.MsgsForm_ColFrom = 'Remitente' AppMessages.MsgsForm_ColSubject = 'Asunto' AppMessages.MsgsForm_ColDate = 'Fecha' AppMessages.MsgsForm_PromptDelete = #191'Est'#225' seguro de eliminar los mensajes seleccionados?' AppMessages.MsgsForm_PromptDelete_WindowCaption = 'Eliminar mensajes' AppMessages.MsgsForm_NoMessagesSelected = '!Ning'#250'n mensaje seleccionado'#161 AppMessages.MsgsForm_NoMessagesSelected_WindowCaption = 'Informaci'#243'n' AppMessages.MsgRec_BtClose = '&Cerrar' AppMessages.MsgRec_WindowCaption = 'Mensaje' AppMessages.MsgRec_Title = 'Mensaje Recibido' AppMessages.MsgRec_LabelFrom = 'De:' AppMessages.MsgRec_LabelDate = 'Fecha' AppMessages.MsgRec_LabelSubject = 'Asunto' AppMessages.MsgRec_LabelMessage = 'Mensaje' AppMessages.MsgSend_BtSend = '&Enviar' AppMessages.MsgSend_BtCancel = '&Cancelar' AppMessages.MsgSend_WindowCaption = 'Mensaje' AppMessages.MsgSend_Title = 'Enviar Nuevo Mensaje' AppMessages.MsgSend_GroupTo = 'Para:' AppMessages.MsgSend_RadioUser = 'Usuario:' AppMessages.MsgSend_RadioAll = 'Todos' AppMessages.MsgSend_GroupMessage = 'Mensaje' AppMessages.MsgSend_LabelSubject = 'Asunto' AppMessages.MsgSend_LabelMessageText = 'Texto del mensaje' CommonMessages.AutoLogonError = 'Error de Ingreso Autom'#225'tico!'#13#10'Especifique un Usuario y Contrase'#241 + 'a V'#225'lidos.' CommonMessages.ChangePasswordError.InvalidCurrentPassword = #161'Contrase'#241'a Actual Incorrecta!' CommonMessages.ChangePasswordError.NewPasswordError = 'Los campos Contrase'#241'a Nueva y Confirme Contrase'#241'a deben ser igua' + 'les' CommonMessages.ChangePasswordError.NewEqualCurrent = 'Nueva Contrase'#241'a y Contrase'#241'a Actual deben ser diferentes' CommonMessages.ChangePasswordError.PasswordRequired = #161'La Contrase'#241'a es obligatoria!' CommonMessages.ChangePasswordError.MinPasswordLength = 'La Contrase'#241'a debe tener un m'#237'nimo de %d caracteres' CommonMessages.ChangePasswordError.InvalidNewPassword = #161'Prohibido utilizar contrase'#241'as NO Seguras!' CommonMessages.InvalidLogin = 'Usuario y/o Contrase'#241'a Incorrectos!' CommonMessages.InitialMessage.Strings = ( 'ATENCION! Conecci'#243'n Inicial:' '' 'Usuario : :user' 'Contrase'#241'a : :password' '' 'Defina permisos para este usuario') CommonMessages.MaxLoginAttemptsError = '%d Intentos de conecci'#243'n inv'#225'lidos !' CommonMessages.PasswordChanged = #161'Se ha cambiado la Contrase'#241'a con '#233'xito!' CommonMessages.BlankPassword = 'Contrase'#241'a vac'#237'a para el Usuario %s' CommonMessages.UsuarioExiste = 'O Usu'#225'rio "%s" j'#225' est'#225' cadastrado no sistema !!' CommonMessages.PasswordExpired = 'Aten'#231#227'o, sua senha expirou, favor troca-la' CommonMessages.ForcaTrocaSenha = 'Mudan'#231'a de senha obrigat'#243'ria' Login.WindowCaption = 'Conecci'#243'n' Login.LabelUser = 'Usuario: ' Login.LabelPassword = 'Contrase'#241'a:' Login.BtOk = 'Aceptar' Login.BtCancel = '&Cancelar' Login.LeftImage.Data = { 07544269746D617016090000424D160900000000000036040000280000003200 0000180000000100080000000000E00400000000000000000000000100000000 000000000000000080000080000000808000800000008000800080800000C0C0 C000C0DCC000F0CAA6000020400000206000002080000020A0000020C0000020 E00000400000004020000040400000406000004080000040A0000040C0000040 E00000600000006020000060400000606000006080000060A0000060C0000060 E00000800000008020000080400000806000008080000080A0000080C0000080 E00000A0000000A0200000A0400000A0600000A0800000A0A00000A0C00000A0 E00000C0000000C0200000C0400000C0600000C0800000C0A00000C0C00000C0 E00000E0000000E0200000E0400000E0600000E0800000E0A00000E0C00000E0 E00040000000400020004000400040006000400080004000A0004000C0004000 E00040200000402020004020400040206000402080004020A0004020C0004020 E00040400000404020004040400040406000404080004040A0004040C0004040 E00040600000406020004060400040606000406080004060A0004060C0004060 E00040800000408020004080400040806000408080004080A0004080C0004080 E00040A0000040A0200040A0400040A0600040A0800040A0A00040A0C00040A0 E00040C0000040C0200040C0400040C0600040C0800040C0A00040C0C00040C0 E00040E0000040E0200040E0400040E0600040E0800040E0A00040E0C00040E0 E00080000000800020008000400080006000800080008000A0008000C0008000 E00080200000802020008020400080206000802080008020A0008020C0008020 E00080400000804020008040400080406000804080008040A0008040C0008040 E00080600000806020008060400080606000806080008060A0008060C0008060 E00080800000808020008080400080806000808080008080A0008080C0008080 E00080A0000080A0200080A0400080A0600080A0800080A0A00080A0C00080A0 E00080C0000080C0200080C0400080C0600080C0800080C0A00080C0C00080C0 E00080E0000080E0200080E0400080E0600080E0800080E0A00080E0C00080E0 E000C0000000C0002000C0004000C0006000C0008000C000A000C000C000C000 E000C0200000C0202000C0204000C0206000C0208000C020A000C020C000C020 E000C0400000C0402000C0404000C0406000C0408000C040A000C040C000C040 E000C0600000C0602000C0604000C0606000C0608000C060A000C060C000C060 E000C0800000C0802000C0804000C0806000C0808000C080A000C080C000C080 E000C0A00000C0A02000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0 E000C0C00000C0C02000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0 A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF FF00FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD525252525252525252525252 5252FDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDAFB75E5E5E66666767676F6F6F6FB752FDFDFDFDFD0000FDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAFBF6FBFBF BFBFBFBFBFBFBFBFBFB752FDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAFB76F676F6FB7B7B7B7B7776F5EB752FD FDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDAFBF6FBFBFBFBFBFBFBFBFBFBFBFB752FDFDFDFDFD0000FDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAFB76F676F6F6FB7B7 B7B7776F5EB752FDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDAFBF6FBFBFBFBFBFBFBFBFBFBFBFBF52FDFDFDFDFD 0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAF B76767676F6F6FB7B7B7776F5EB752FDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAFBF6FBFBFBFBFBFBFBFBFBFBF BFBF52FDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDAFB76767676F6F6F6FB7B7776F5EB752FDFDFDFDFD0000FDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAFBF6FBFBF BFBFBFBFBFBFBFBFBFBF52FDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDAFBFB7AFAFB7B7B7B7BFBFBFBFB7B752FD FDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDAFB76F675E5E5E5E5E5E676FB7A5FDFDFDFDFDFD0000FDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF7F79BFDFDFDFD FDFDA4F7A3FDFDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDF7F79BFDFDFDFDFDFDA407A3FDFDFDFDFDFDFD 0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDF7F79BFDFDFDFDFDFDA407A3FDFDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF7F7A4FDFDFDFDFDFDF707 A3FDFDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDF707A49AFDFDFDFDA30707A3FDFDFDFDFDFDFD0000FDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF7F6A4 A49B9A9AA3A407079AFDFDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF7F6F7F7A4A4F70707A3FDFDFDFD FDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDF7F6F6F6F6F607A3FDFDFDFDFDFDFDFDFD0000FDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF7A3A3A3 A3A3FDFDFDFDFDFDFDFDFDFD0000FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD FDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFD 0000} Login.LabelTentativa = 'Tentativa : ' Login.LabelTentativas = 'M'#225'ximo de Tentativas : ' Log.WindowCaption = 'Seguridad' Log.LabelDescription = 'Visor de Eventos' Log.LabelUser = 'Usuario:' Log.LabelDate = 'Fecha:' Log.LabelLevel = 'Nivel M'#237'nimo: ' Log.ColAppID = 'AppID' Log.ColLevel = 'Nivel' Log.ColMessage = 'Mensaje' Log.ColUser = 'Usuario' Log.ColDate = 'Fecha' Log.BtFilter = '&Aplicar Filtro' Log.BtDelete = '&Borrar Bit'#225'cora' Log.BtClose = '&Cerrar' Log.PromptDelete = #191'Est'#225' seguro de Eliminar todos todos los registros de Bit'#225'cora s' + 'eleccionados?' Log.PromptDelete_WindowCaption = 'Confirmaci'#243'n' Log.OptionUserAll = 'Todos' Log.OptionLevelLow = 'Bajo' Log.OptionLevelNormal = 'Normal' Log.OptionLevelHigh = 'Alto' Log.OptionLevelCritic = 'Cr'#237'tico' Log.DeletePerformed = 'Borrado de registros de bit'#225'cora realizado: Usuario = "%s" | Fec' + 'ha = %s a %s | Nivel <= %s' UsersForm.WindowCaption = 'Seguridad' UsersForm.LabelDescription = 'Administraci'#243'n de Usuarios' UsersForm.ColName = 'Nombre' UsersForm.ColLogin = 'Usuario' UsersForm.ColEmail = 'Correo' UsersForm.BtAdd = '&Nuevo' UsersForm.BtChange = '&Editar' UsersForm.BtDelete = 'E&liminar' UsersForm.PromptDelete = #191'Est'#225' seguro de Eliminar al Usuario "%s"?' UsersForm.PromptDelete_WindowCaption = 'Eliminar usuario' UsersForm.BtRights = '&Accesos' UsersForm.BtPassword = 'C&ontrase'#241'a' UsersForm.BtClose = '&Cerrar' AddChangeUser.WindowCaption = 'Administraci'#243'n de Usuarios' AddChangeUser.LabelAdd = 'Nuevo Usuario' AddChangeUser.LabelChange = 'Editar Usuario' AddChangeUser.LabelName = 'Nombre:' AddChangeUser.LabelLogin = 'Usuario: ' AddChangeUser.LabelEmail = 'Correo: ' AddChangeUser.LabelPerfil = 'Perfil: ' AddChangeUser.CheckPrivileged = 'Usuario Privilegiado' AddChangeUser.BtSave = '&Guardar' AddChangeUser.BtCancel = 'Cancelar' AddChangeUser.CheckExpira = 'Senha do usu'#225'rio n'#227'o expira' AddChangeUser.Day = 'Dias' AddChangeUser.ExpiredIn = 'Expira em' AddChangeProfile.WindowCaption = 'Perfiles de Usuarios' AddChangeProfile.LabelAdd = 'Nuevo Perfil' AddChangeProfile.LabelChange = 'Editar Perfil' AddChangeProfile.LabelName = 'Descripci'#243'n: ' AddChangeProfile.BtSave = '&Guardar' AddChangeProfile.BtCancel = 'Cancelar' UsersProfile.WindowCaption = 'Seguridad' UsersProfile.LabelDescription = 'Perfil de Usuario' UsersProfile.ColProfile = 'Perfil' UsersProfile.BtAdd = '&Nuevo' UsersProfile.BtChange = '&Editar' UsersProfile.BtDelete = 'E&liminar' UsersProfile.BtRights = '&Accesos' UsersProfile.PromptDelete = 'Existe(n) usuario(s) con el Perfil "%s". '#191'Est'#225' seguro de elimina' + 'r el perfil?' UsersProfile.PromptDelete_WindowCaption = 'Eliminar perfil' UsersProfile.BtClose = '&Cerrar' Rights.WindowCaption = 'Seguridad' Rights.LabelUser = 'Permisos de Usuario : ' Rights.LabelProfile = 'Permisos del Perfil : ' Rights.PageMenu = 'Elementos del Men'#250 Rights.PageActions = 'Acciones' Rights.PageControls = 'Controles' Rights.BtUnlock = '&Permitir' Rights.BtLock = '&Bloquear' Rights.BtSave = '&Guardar' Rights.BtCancel = '&Cancelar' ChangePassword.WindowCaption = 'Seguridad' ChangePassword.LabelDescription = 'Cambiar Contrase'#241'a' ChangePassword.LabelCurrentPassword = 'Contrase'#241'a Actual:' ChangePassword.LabelNewPassword = 'Nueva Contrase'#241'a:' ChangePassword.LabelConfirm = 'Confirme Contrase'#241'a:' ChangePassword.BtSave = '&Guardar' ChangePassword.BtCancel = 'Cancelar' ResetPassword.WindowCaption = 'Ingrese Contrase'#241'a de Usuario: "%s"' ResetPassword.LabelPassword = 'Contrase'#241'a: ' History.Evento_Insert = 'Nuevo' History.Evento_Delete = 'Eliminar' History.Evento_Edit = 'Editar' History.Evento_NewRecord = 'Nuevo registro' History.Hist_All = 'Todos' History.Msg_LimpHistorico = 'Excluir el contenido entero del hist'#243'rico ?' History.Msg_MensConfirma = 'Confirme' History.Msg_LogEmptyHistory = 'El usuario %s borra la historia de mesa en %s ' History.LabelDescricao = 'Hist'#243'rico de tabelas' History.LabelUser = 'Usuario' History.LabelForm = 'Formul'#225'rio' History.LabelEvento = 'Evento' History.LabelTabela = 'Tabela' History.LabelDataEvento = 'Data' History.LabelHoraEvento = 'Hora' History.Msg_NewRecord = '%s Inserte el nuevo registro' History.Hist_MsgExceptPropr = 'Por favor informe la propiedad %s' History.Hist_BtnFiltro = '&Aplicar Filtro' History.Hist_BtnExcluir = '&Borrar Hist'#243'rico' History.Hist_BtnFechar = '&Cerrar' TypeFieldsDB.Type_VarChar = 'VarChar' TypeFieldsDB.Type_Char = 'Char' TypeFieldsDB.Type_Int = 'Int' TypeFieldsDB.Type_MemoField = 'BLOB SUB_TYPE 1 SEGMENT SIZE 1024' Language = ucSpanish Left = 40 Top = 16 end object rda_Usuarios: TDARemoteDataAdapter DataStreamer = Bin2DataStreamer GetSchemaCall.RemoteService = srvUsuarios GetDataCall.RemoteService = srvUsuarios UpdateDataCall.RemoteService = srvUsuarios GetScriptsCall.RemoteService = srvUsuarios RemoteService = srvUsuarios Left = 176 Top = 16 end object Bin2DataStreamer: TDABin2DataStreamer Left = 40 Top = 144 end object tbl_USUARIOS: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_USUARIOS_ID' Required = True DictionaryEntry = 'USUARIOS_ID' InPrimaryKey = True end item Name = 'USERNAME' DataType = datString Size = 30 DisplayLabel = 'Nombre' DictionaryEntry = 'USUARIOS_USERNAME' end item Name = 'LOGIN' DataType = datString Size = 30 DisplayLabel = 'Login' DictionaryEntry = 'USUARIOS_LOGIN' end item Name = 'PASS' DataType = datString Size = 250 DisplayLabel = 'Password' DictionaryEntry = 'USUARIOS_PASS' end item Name = 'PASSEXPIRED' DataType = datDateTime DisplayLabel = 'Expiraci'#243'n de password' DictionaryEntry = 'USUARIOS_PASSEXPIRED' end item Name = 'BLOQUEADO' DataType = datSmallInt DisplayLabel = 'Bloqueado' DictionaryEntry = 'USUARIOS_BLOQUEADO' end item Name = 'EMAIL' DataType = datString Size = 150 DisplayLabel = 'Correo electr'#243'nico' DictionaryEntry = 'USUARIOS_EMAIL' end item Name = 'USERDAYSSUN' DataType = datInteger DisplayLabel = 'USUARIOS_USERDAYSSUN' DictionaryEntry = 'USUARIOS_USERDAYSSUN' end item Name = 'PRIVILEGED' DataType = datInteger DisplayLabel = 'Privilegiado' DictionaryEntry = 'USUARIOS_PRIVILEGED' end item Name = 'TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' DictionaryEntry = 'USUARIOS_TIPO' end item Name = 'ID_PERFIL' DataType = datInteger DictionaryEntry = 'USUARIOS_ID_PERFIL' end item Name = 'CHECKSUM' DataType = datString Size = 250 DisplayLabel = 'Checksum' DictionaryEntry = 'USUARIOS_CHECKSUM' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Usuarios LogicalName = 'USUARIOS' IndexDefs = <> Left = 176 Top = 80 end object ds_USUARIOS: TDADataSource DataSet = tbl_USUARIOS.Dataset DataTable = tbl_USUARIOS Left = 176 Top = 136 end object tbl_PERFILES: TDAMemDataTable RemoteUpdatesOptions = [] Fields = < item Name = 'ID' DataType = datAutoInc GeneratorName = 'GEN_USUARIOS_ID' Required = True DictionaryEntry = 'PERFILES_ID' InPrimaryKey = True end item Name = 'USERNAME' DataType = datString Size = 30 DisplayLabel = 'Nombre' DictionaryEntry = 'PERFILES_USERNAME' end item Name = 'LOGIN' DataType = datString Size = 30 DisplayLabel = 'Login' DictionaryEntry = 'PERFILES_LOGIN' end item Name = 'TIPO' DataType = datString Size = 1 DisplayLabel = 'Tipo' DictionaryEntry = 'PERFILES_TIPO' end> Params = <> StreamingOptions = [soDisableEventsWhileStreaming] RemoteDataAdapter = rda_Usuarios LogicalName = 'PERFILES' IndexDefs = <> Left = 272 Top = 80 end object ds_PERFILES: TDADataSource DataSet = tbl_PERFILES.Dataset DataTable = tbl_PERFILES Left = 272 Top = 136 end object srvLogin: TRORemoteService Message = dmConexion.ROMessage Channel = dmConexion.ROChannel ServiceName = 'srvLogin' Left = 40 Top = 208 end end