284 lines
14 KiB
ObjectPascal
284 lines
14 KiB
ObjectPascal
|
{ Translated by Francisco Armando Due<EFBFBD>as Rodr<EFBFBD>guez - Canc<EFBFBD>n
|
|||
|
|
ultima revis<EFBFBD>o - Vicente Barros Leonel - Brasil
|
|||
|
|
}
|
|||
|
|
unit UCConsts;
|
|||
|
|
|
|||
|
|
interface
|
|||
|
|
|
|||
|
|
Const
|
|||
|
|
|
|||
|
|
// new consts version 2 a 5 =========================================
|
|||
|
|
// Form Select Controls (design-time)
|
|||
|
|
Const_Contr_TitleLabel = 'Seleccionar Componentes del Formulario:';
|
|||
|
|
Const_Contr_GroupLabel = 'Grupo:';
|
|||
|
|
Const_Contr_CompDispLabel = 'Componentes Disponibles:';
|
|||
|
|
Const_Contr_CompSelLabel = 'Componentes Seleccionados:';
|
|||
|
|
Const_Contr_BtOK = '&Aceptar';
|
|||
|
|
Const_Contr_BTCancel = '&Cancelar';
|
|||
|
|
Const_Contr_DescCol = 'Descripci<63>n';
|
|||
|
|
Const_Contr_BtSellAllHint = 'Seleccionar Todo'; //added by fduenas
|
|||
|
|
Const_Contr_BtSelHint = 'Seleccionar'; //added by fduenas
|
|||
|
|
Const_Contr_BtUnSelHint = 'Deseleccionar'; //added by fduenas
|
|||
|
|
Const_Contr_BtUnSelAllHint = 'Deseleccionar Todo'; //added by fduenas
|
|||
|
|
|
|||
|
|
//===================================================================
|
|||
|
|
|
|||
|
|
|
|||
|
|
// group property Settins.AppMsgsForm
|
|||
|
|
Const_Msgs_BtNew = '&Nuevo Mensaje';
|
|||
|
|
Const_Msgs_BtReplay = '&Responder';
|
|||
|
|
Const_Msgs_BtForward = '&Reenviar';
|
|||
|
|
Const_Msgs_BtDelete = '&Borrar';
|
|||
|
|
Const_Msgs_BtClose = '&Cerrar'; //added by fduenas
|
|||
|
|
Const_Msgs_WindowCaption = 'Mensajes de Sistema';
|
|||
|
|
Const_Msgs_ColFrom = 'Remitente';
|
|||
|
|
Const_Msgs_ColSubject = 'Asunto';
|
|||
|
|
Const_Msgs_ColDate = 'Fecha';
|
|||
|
|
Const_Msgs_PromptDelete = '<27>Est<73> seguro de eliminar los mensajes seleccionados?';
|
|||
|
|
Const_Msgs_PromptDelete_WindowCaption = 'Eliminar mensajes'; //added by fduenas
|
|||
|
|
Const_Msgs_NoMessagesSelected = '!Ning<6E>n mensaje seleccionado<64>'; //added by fduenas
|
|||
|
|
Const_Msgs_NoMessagesSelected_WindowCaption = 'Informaci<63>n'; //added by fduenas
|
|||
|
|
|
|||
|
|
// group property Settins.AppMsgsRec
|
|||
|
|
Const_MsgRec_BtClose = '&Cerrar';
|
|||
|
|
Const_MsgRec_WindowCaption = 'Mensaje';
|
|||
|
|
Const_MsgRec_Title = 'Mensaje Recibido';
|
|||
|
|
Const_MsgRec_LabelFrom = 'De:';
|
|||
|
|
Const_MsgRec_LabelDate = 'Fecha';
|
|||
|
|
Const_MsgRec_LabelSubject = 'Asunto';
|
|||
|
|
Const_MsgRec_LabelMessage = 'Mensaje';
|
|||
|
|
|
|||
|
|
// group property Settins.AppMsgsSend
|
|||
|
|
Const_MsgSend_BtSend = '&Enviar';
|
|||
|
|
Const_MsgSend_BtCancel = '&Cancelar';
|
|||
|
|
Const_MsgSend_WindowCaption = 'Mensaje';
|
|||
|
|
Const_MsgSend_Title = 'Enviar Nuevo Mensaje';
|
|||
|
|
Const_MsgSend_GroupTo = 'Para:';
|
|||
|
|
Const_MsgSend_RadioUser = 'Usuario:';
|
|||
|
|
Const_MsgSend_RadioAll = 'Todos';
|
|||
|
|
Const_MsgSend_GroupMessage = 'Mensaje';
|
|||
|
|
Const_MsgSend_LabelSubject = 'Asunto'; //added by fduenas
|
|||
|
|
Const_MsgSend_LabelMessageText = 'Texto del mensaje'; //added by fduenas
|
|||
|
|
|
|||
|
|
// Run errors
|
|||
|
|
MsgExceptConnection = '<27>Valor No V<>lido para la propiedad Connection del componente %s!';
|
|||
|
|
MsgExceptTransaction = '<27>Valor No V<>lido para la propiedad Transaction del componente %s!';
|
|||
|
|
MsgExceptDatabase = '<27>Valor No V<>lido para la propiedad Database del componente %s!';
|
|||
|
|
MsgExceptPropriedade = 'Favor informar a propriedade %s';
|
|||
|
|
MsgExceptUserMngMenu = 'Ingrese en la propiedad UsersForm.MenuItem o UsersForm.Action la opci<63>n del menu para abrir el Control de Usuarios';
|
|||
|
|
MsgExceptUserProfile = 'Ingrese en la propiedad UsersProfile.MenuItem o UsersProfile.Action la opci<63>n del menu para abrir el Perfil de Usuarios';
|
|||
|
|
MsgExceptChagePassMenu = 'Ingrese en la propiedad ChangePasswordForm.MenuItem o .Action la opci<63>n del men<65> que permite al usuario cambiar su Contrase<73>a';
|
|||
|
|
MsgExceptAppID = 'La propiedad ApplicationID requiere el nombre v<>lido de una tabla para el registro de los Permisos de Usuario';
|
|||
|
|
MsgExceptUsersTable = 'La propiedad UserTable requiere el nombre v<>lido de una tabla para registrar/seleccionar los datos de los usuarios';
|
|||
|
|
MsgExceptRightsTable = 'La propiead RightTable requiere el nombre v<>lido de una tabla para registrar/seleccionar los permisos de los usuarios';
|
|||
|
|
MsgExceptConnector = 'Propriedade DataConnector n<>o definida!';
|
|||
|
|
|
|||
|
|
|
|||
|
|
// group property Settings.Mensagens
|
|||
|
|
Const_Men_AutoLogonError = 'Error de Ingreso Autom<6F>tico!'+#13+#10+ 'Especifique un Usuario y Contrase<73>a V<>lidos.';
|
|||
|
|
Const_Men_SenhaDesabitada = 'Contrase<73>a vac<61>a para el Usuario %s';
|
|||
|
|
Const_Men_SenhaAlterada = '<27>Se ha cambiado la Contrase<73>a con <20>xito!';
|
|||
|
|
Const_Men_MsgInicial = 'ATENCION! Conecci<63>n Inicial:'+#13+#10+#13+#10+'Usuario : :user'+#13+#10+'Contrase<73>a : :password'+#13+#10+#13+#10+'Defina permisos para este usuario';
|
|||
|
|
Const_Men_MaxTentativas = '%d Intentos de conecci<63>n inv<6E>lidos !';
|
|||
|
|
Const_Men_LoginInvalido = 'Usuario y/o Contrase<73>a Incorrectos!';
|
|||
|
|
Const_Men_UsuarioExiste = 'O Usu<73>rio "%s" j<> est<73> cadastrado no sistema !!'; // Luiz Benevenuto 20/04/06
|
|||
|
|
Const_Men_PasswordExpired = 'Aten<65><6E>o, sua senha expirou, favor troca-la'; { By vicente barros leonel }
|
|||
|
|
|
|||
|
|
//group property Settings.Login
|
|||
|
|
Const_Log_BtCancelar = '&Cancelar';
|
|||
|
|
Const_Log_BtOK = 'Aceptar';
|
|||
|
|
Const_Log_LabelSenha = 'Contrase<73>a:';
|
|||
|
|
Const_Log_LabelUsuario = 'Usuario: ';
|
|||
|
|
Const_Log_WindowCaption = 'Conecci<63>n';
|
|||
|
|
Const_Log_LbEsqueciSenha = 'Olvid<69> mi Contrase<73>a';
|
|||
|
|
Const_Log_MsgMailSend = 'La contrase<73>a fue enviada a su correo.';
|
|||
|
|
Const_Log_LabelTentativa = 'Tentativa : ';
|
|||
|
|
Const_Log_LabelTentativas = 'M<>ximo de Tentativas : ';
|
|||
|
|
|
|||
|
|
|
|||
|
|
//group property Settings.Log //new
|
|||
|
|
Const_LogC_WindowCaption = 'Seguridad';
|
|||
|
|
Const_LogC_LabelDescricao = 'Visor de Eventos';
|
|||
|
|
Const_LogC_LabelUsuario = 'Usuario:';
|
|||
|
|
Const_LogC_ColunaAppID = 'AppID';
|
|||
|
|
Const_LogC_LabelData = 'Fecha:';
|
|||
|
|
Const_LogC_LabelNivel = 'Nivel M<>nimo: ';
|
|||
|
|
Const_LogC_ColunaNivel = 'Nivel';
|
|||
|
|
Const_LogC_ColunaMensagem = 'Mensaje';
|
|||
|
|
Const_LogC_ColunaUsuario = 'Usuario';
|
|||
|
|
Const_LogC_ColunaData = 'Fecha';
|
|||
|
|
Const_LogC_BtFiltro = '&Aplicar Filtro';
|
|||
|
|
Const_LogC_BtExcluir = '&Borrar Bit<69>cora';
|
|||
|
|
Const_LogC_BtFechar = '&Cerrar';
|
|||
|
|
Const_LogC_ConfirmaExcluir = '<27>Est<73> seguro de Eliminar todos todos los registros de Bit<69>cora seleccionados?';
|
|||
|
|
Const_LogC_ConfirmaDelete_WindowCaption = 'Confirmaci<63>n'; //added by fduenas
|
|||
|
|
Const_LogC_Todos = 'Todos'; //BGM
|
|||
|
|
Const_LogC_Low = 'Bajo'; //BGM
|
|||
|
|
Const_LogC_Normal = 'Normal'; //BGM
|
|||
|
|
Const_LogC_High = 'Alto'; //BGM
|
|||
|
|
Const_LogC_Critic = 'Cr<43>tico'; //BGM
|
|||
|
|
Const_LogC_ExcluirEfectuada = 'Borrado de registros de bit<69>cora realizado: '+
|
|||
|
|
'Usuario = "%s" | Fecha = %s a %s | Nivel <= %s'; //added by fduenas
|
|||
|
|
|
|||
|
|
//group property Settings.CadastroUsuarios
|
|||
|
|
Const_Cad_WindowCaption = 'Seguridad';
|
|||
|
|
Const_Cad_LabelDescricao = 'Administraci<63>n de Usuarios';
|
|||
|
|
Const_Cad_ColunaNome = 'Nombre';
|
|||
|
|
Const_Cad_ColunaLogin = 'Usuario';
|
|||
|
|
Const_Cad_ColunaEmail = 'Correo';
|
|||
|
|
Const_Cad_BtAdicionar = '&Nuevo';
|
|||
|
|
Const_Cad_BtAlterar = '&Editar';
|
|||
|
|
Const_Cad_BtExcluir = 'E&liminar';
|
|||
|
|
Const_Cad_BtPermissoes = '&Accesos';
|
|||
|
|
Const_Cad_BtSenha = 'C&ontrase<73>a';
|
|||
|
|
Const_Cad_BtFechar = '&Cerrar';
|
|||
|
|
Const_Cad_ConfirmaExcluir = '<27>Est<73> seguro de Eliminar al Usuario "%s"?';
|
|||
|
|
Const_Cad_ConfirmaDelete_WindowCaption = 'Eliminar usuario'; //added by fduenas
|
|||
|
|
|
|||
|
|
//group property Settings.PerfilUsuarios
|
|||
|
|
Const_Prof_WindowCaption = 'Seguridad';
|
|||
|
|
Const_Prof_LabelDescricao = 'Perfil de Usuario';
|
|||
|
|
Const_Prof_ColunaNome = 'Perfil';
|
|||
|
|
Const_Prof_BtAdicionar = '&Nuevo';
|
|||
|
|
Const_Prof_BtAlterar = '&Editar';
|
|||
|
|
Const_Prof_BtExcluir = 'E&liminar';
|
|||
|
|
Const_Prof_BtPermissoes = '&Accesos'; //BGM
|
|||
|
|
Const_Prof_BtSenha = 'C&ontrase<73>a';
|
|||
|
|
Const_Prof_BtFechar = '&Cerrar';
|
|||
|
|
Const_Prof_ConfirmaExcluir = 'Existe(n) usuario(s) con el Perfil "%s". <20>Est<73> seguro de eliminar el perfil?';
|
|||
|
|
Const_Prof_ConfirmaDelete_WindowCaption = 'Eliminar perfil'; //added by fduenas
|
|||
|
|
|
|||
|
|
//group property Settings.IncAltUsuario
|
|||
|
|
Const_Inc_WindowCaption = 'Administraci<63>n de Usuarios';
|
|||
|
|
Const_Inc_LabelAdicionar = 'Nuevo Usuario';
|
|||
|
|
Const_Inc_LabelAlterar = 'Editar Usuario';
|
|||
|
|
Const_Inc_LabelNome = 'Nombre:';
|
|||
|
|
Const_Inc_LabelLogin = 'Usuario: ';
|
|||
|
|
Const_Inc_LabelEmail = 'Correo: ';
|
|||
|
|
Const_Inc_LabelPerfil = 'Perfil: ';
|
|||
|
|
Const_Inc_CheckPrivilegiado = 'Usuario Privilegiado';
|
|||
|
|
Const_Inc_BtGravar = '&Guardar';
|
|||
|
|
Const_Inc_BtCancelar = 'Cancelar';
|
|||
|
|
Const_Inc_CheckEspira = 'Senha do usu<73>rio n<>o expira';
|
|||
|
|
Const_Inc_Dia = 'Dias';
|
|||
|
|
Const_Inc_ExpiraEm = 'Expira em';
|
|||
|
|
|
|||
|
|
|
|||
|
|
//group property Settings.IncAltPerfil
|
|||
|
|
Const_PInc_WindowCaption = 'Perfiles de Usuarios';
|
|||
|
|
Const_PInc_LabelAdicionar = 'Nuevo Perfil';
|
|||
|
|
Const_PInc_LabelAlterar = 'Editar Perfil';
|
|||
|
|
Const_PInc_LabelNome = 'Descripci<63>n: ';
|
|||
|
|
Const_PInc_BtGravar = '&Guardar';
|
|||
|
|
Const_PInc_BtCancelar = 'Cancelar';
|
|||
|
|
|
|||
|
|
//group property Settings.Permissao
|
|||
|
|
Const_Perm_WindowCaption = 'Seguridad';
|
|||
|
|
Const_Perm_LabelUsuario = 'Permisos de Usuario : ';
|
|||
|
|
Const_Perm_LabelPerfil = 'Permisos del Perfil : ';
|
|||
|
|
Const_Perm_PageMenu = 'Elementos del Men<65>';
|
|||
|
|
Const_Perm_PageActions = 'Acciones';
|
|||
|
|
Const_Perm_PageControls = 'Controles';
|
|||
|
|
Const_Perm_BtLibera = '&Permitir';
|
|||
|
|
Const_Perm_BtBloqueia = '&Bloquear';
|
|||
|
|
Const_Perm_BtGravar = '&Guardar';
|
|||
|
|
Const_Perm_BtCancelar = '&Cancelar';
|
|||
|
|
|
|||
|
|
//group property Settings.TrocaSenha do begin
|
|||
|
|
Const_Troc_WindowCaption = 'Seguridad';
|
|||
|
|
Const_Troc_LabelDescricao = 'Cambiar Contrase<73>a';
|
|||
|
|
Const_Troc_LabelSenhaAtual = 'Contrase<73>a Actual:';
|
|||
|
|
Const_Troc_LabelNovaSenha = 'Nueva Contrase<73>a:';
|
|||
|
|
Const_Troc_LabelConfirma = 'Confirme Contrase<73>a:';
|
|||
|
|
Const_Troc_BtGravar = '&Guardar';
|
|||
|
|
Const_Troc_BtCancelar = 'Cancelar';
|
|||
|
|
|
|||
|
|
//group property Settings.Mensagens.ErroTrocaSenha
|
|||
|
|
Const_ErrPass_SenhaAtualInvalida = '<27>Contrase<73>a Actual Incorrecta!';
|
|||
|
|
Const_ErrPass_ErroNovaSenha = 'Los campos Contrase<73>a Nueva y Confirme Contrase<73>a deben ser iguales';
|
|||
|
|
Const_ErrPass_NovaIgualAtual = 'Nueva Contrase<73>a y Contrase<73>a Actual deben ser diferentes';
|
|||
|
|
Const_ErrPass_SenhaObrigatoria = '<27>La Contrase<73>a es obligatoria!';
|
|||
|
|
Const_ErrPass_SenhaMinima = 'La Contrase<73>a debe tener un m<>nimo de %d caracteres';
|
|||
|
|
Const_ErrPass_SenhaInvalida = '<27>Prohibido utilizar contrase<73>as NO Seguras!';
|
|||
|
|
Const_ErrPass_ForcaTrocaSenha = 'Mudan<61>a de senha obrigat<61>ria';
|
|||
|
|
|
|||
|
|
//group property Settings.DefineSenha
|
|||
|
|
Const_DefPass_WindowCaption = 'Ingrese Contrase<73>a de Usuario: "%s"';
|
|||
|
|
Const_DefPass_LabelSenha = 'Contrase<73>a: ';
|
|||
|
|
|
|||
|
|
//Group das tabelas do UC
|
|||
|
|
Const_TableUsers_FieldUserID = 'UCIdUser';
|
|||
|
|
Const_TableUsers_FieldUserName = 'UCUserName';
|
|||
|
|
Const_TableUsers_FieldLogin = 'UCLogin';
|
|||
|
|
Const_TableUsers_FieldPassword = 'UCPassword';
|
|||
|
|
Const_TableUsers_FieldEmail = 'UCEmail';
|
|||
|
|
Const_TableUsers_FieldPrivileged = 'UCPrivileged';
|
|||
|
|
Const_TableUsers_FieldTypeRec = 'UCTypeRec';
|
|||
|
|
Const_TableUsers_FieldProfile = 'UCProfile';
|
|||
|
|
Const_TableUsers_FieldKey = 'UCKey';
|
|||
|
|
Const_TableUsers_TableName = 'UCTabUsers';
|
|||
|
|
Const_TableUsers_FieldDateExpired = 'UCPASSEXPIRED'; { By Vicente Barros Leonel }
|
|||
|
|
Const_TableUser_FieldUserExpired = 'UCUserExpired'; { By Vicente Barros Leonel }
|
|||
|
|
Const_TableUser_FieldUserDaysSun = 'UCUserDaysSun'; { By Vicente Barros Leonel }
|
|||
|
|
|
|||
|
|
Const_TableRights_FieldUserID = 'UCIdUser';
|
|||
|
|
Const_TableRights_FieldModule = 'UCModule';
|
|||
|
|
Const_TableRights_FieldComponentName = 'UCCompName';
|
|||
|
|
Const_TableRights_FieldFormName = 'UCFormName';
|
|||
|
|
Const_TableRights_FieldKey = 'UCKey';
|
|||
|
|
Const_TableRights_TableName = 'UCTabRights';
|
|||
|
|
|
|||
|
|
Const_TableUsersLogged_FieldLogonID = 'UCIdLogon';
|
|||
|
|
Const_TableUsersLogged_FieldUserID = 'UCIdUser';
|
|||
|
|
Const_TableUsersLogged_FieldApplicationID = 'UCApplicationId';
|
|||
|
|
Const_TableUsersLogged_FieldMachineName = 'UCMachineName';
|
|||
|
|
Const_TableUsersLogged_FieldData = 'UCData';
|
|||
|
|
Const_TableUsersLogged_TableName = 'UCTabUsersLogged';
|
|||
|
|
|
|||
|
|
|
|||
|
|
{ TUCHISTORICO }
|
|||
|
|
//Eventos
|
|||
|
|
Const_Evento_Insert = 'Inserido';
|
|||
|
|
Const_Evento_Delete = 'Apagado';
|
|||
|
|
Const_Evento_Edit = 'Editado';
|
|||
|
|
Const_Evento_NewRecord = 'Novo registro';
|
|||
|
|
|
|||
|
|
//Gerais
|
|||
|
|
Const_Hist_All = 'Todos';
|
|||
|
|
Const_Msg_LimpHistorico = 'Excluir todo o conte<74>do do hist<73>rico ?';
|
|||
|
|
Const_Msg_MensConfirma = 'Confirma<6D><61>o';
|
|||
|
|
Const_Msg_LogEmptyHistory = 'Usu<73>rio %s apagou todo o hist<73>rico as %s';
|
|||
|
|
Const_LabelDescricao = 'Hist<73>rico de tabelas';
|
|||
|
|
Const_LabelUser = 'Usu<73>rio';
|
|||
|
|
Const_LabelForm = 'Formul<75>rio';
|
|||
|
|
Const_LabelEvento = 'Evento';
|
|||
|
|
Const_LabelTabela = 'Tabela';
|
|||
|
|
Const_LabelDataEvento = 'Data';
|
|||
|
|
Const_LabelHoraEvento = 'Hora';
|
|||
|
|
Const_Msg_NewRecord = '%s inseriu um novo registro';
|
|||
|
|
|
|||
|
|
//Campos da tabela
|
|||
|
|
Const_Hist_TableName = 'UCTABHistory';
|
|||
|
|
Const_Hist_FieldApplicationID = 'ApplicationID';
|
|||
|
|
Const_Hist_FieldUserID = 'UserID';
|
|||
|
|
Const_Hist_FieldEventDate = 'EventDate';
|
|||
|
|
Const_Hist_FieldEventTime = 'EventTime';
|
|||
|
|
Const_Hist_FieldForm = 'Form';
|
|||
|
|
Const_Hist_FieldCaptionForm = 'FormCaption';
|
|||
|
|
Const_Hist_FieldEvent = 'Event';
|
|||
|
|
Const_Hist_FieldObs = 'Obs';
|
|||
|
|
Const_Hist_FieldTableName = 'tName'; // nome do campo que grava a tabela n<>o confuda com o nome da tabela fisicamente
|
|||
|
|
|
|||
|
|
// mensagem de erro
|
|||
|
|
Const_Hist_MsgExceptPropr = 'Favor informar a propriedade %s';
|
|||
|
|
|
|||
|
|
//Botoes do form
|
|||
|
|
Const_Hist_BtnFiltro = '&Aplicar Filtro';
|
|||
|
|
Const_Hist_BtnExcluir = '&Borrar Hist<73>rico';
|
|||
|
|
Const_Hist_BtnFechar = '&Cerrar';
|
|||
|
|
|
|||
|
|
|
|||
|
|
implementation
|
|||
|
|
|
|||
|
|
end.
|