ucconsts.pas

User control for Delphi 5..2007 User control access modificated

unit UCConsts;

interface

const
  // new consts version 2 a 5 =========================================
  // Form Select Controls (design-time)
  Const_Contr_TitleLabel     = 'Sele玢o de Componentes do Form. :';
  Const_Contr_GroupLabel     = 'Grupo :';
  Const_Contr_CompDispLabel  = 'Componentes Dispon韛eis :';
  Const_Contr_CompSelLabel   = 'Componentes Selecionados :';
  Const_Contr_BtOK           = '&OK';
  Const_Contr_BTCancel       = '&Cancelar';
  Const_Contr_DescCol        = 'Descri玢o';
  Const_Contr_BtSellAllHint  = 'Selecionar Todos';
  Const_Contr_BtSelHint      = 'Selecionar';
  Const_Contr_BtUnSelHint    = 'Desmarcar';
  Const_Contr_BtUnSelAllHint = 'Desmarcar Todos';
                                               //===================================================================

  // group property Settins.AppMsgsForm
  Const_Msgs_BtNew                            = '&Nova Mensagem';
  Const_Msgs_BtReplay                         = '&Responder';
  Const_Msgs_BtForward                        = 'E&ncaminhar';
  Const_Msgs_BtDelete                         = '&Excluir';
  Const_Msgs_BtClose                          = '&Fechar';
  Const_Msgs_WindowCaption                    = 'Mensagens do Sistema';
  Const_Msgs_ColFrom                          = 'Remetente';
  Const_Msgs_ColSubject                       = 'Assunto';
  Const_Msgs_ColDate                          = 'Data';
  Const_Msgs_PromptDelete                     = 'Confirma excluir as mensagens selecionadas ?';
  Const_Msgs_PromptDelete_WindowCaption       = 'Apagar mensagens';
  Const_Msgs_NoMessagesSelected               = 'N鉶 existem mensagens selecionadas';
  Const_Msgs_NoMessagesSelected_WindowCaption = 'Informa玢o';


  // group property Settins.AppMsgsRec
  Const_MsgRec_BtClose       = '&Fechar';
  Const_MsgRec_WindowCaption = 'Mensagem';
  Const_MsgRec_Title         = 'Mensagem Recebida';
  Const_MsgRec_LabelFrom     = 'De :';
  Const_MsgRec_LabelDate     = 'Data';
  Const_MsgRec_LabelSubject  = 'Assunto';
  Const_MsgRec_LabelMessage  = 'Mensagem';

  // group property Settins.AppMsgsSend
  Const_MsgSend_BtSend           = '&Enviar';
  Const_MsgSend_BtCancel         = '&Cancelar';
  Const_MsgSend_WindowCaption    = 'Mensagem';
  Const_MsgSend_Title            = 'Enviar Nova Mensagem';
  Const_MsgSend_GroupTo          = 'Para';
  Const_MsgSend_RadioUser        = 'Usu醨io :';
  Const_MsgSend_RadioAll         = 'Todos';
  Const_MsgSend_GroupMessage     = 'Mensagem';
  Const_MsgSend_LabelSubject     = 'Assunto';
  Const_MsgSend_LabelMessageText = 'Texto da mensagem';


  // Run errors
  MsgExceptConnection    = 'N鉶 informado o Connection, Transaction ou Database do componente %s';
  MsgExceptTransaction   = 'N鉶 informado o Transaction do componente %s';
  MsgExceptDatabase      = 'N鉶 informado o Database do componente %s';
  MsgExceptPropriedade   = 'Favor informar a propriedade %s';
  MsgExceptUserMngMenu   = 'Informe na propriedade UsersForm.MenuItem ou UsersForm.Action o Item respons醰el pelo controle de usu醨ios';
  MsgExceptUserProfile   = 'Informe na propriedade UsersProfile.MenuItem ou UsersProfile.Action o Item respons醰el pelo controle de Perfil de usu醨ios';
  MsgExceptChagePassMenu = 'Informe na propriedade ChangePasswordForm.MenuItem or .Action o Item que permite ao usu醨io alterar sua senha';
  MsgExceptAppID         = 'Na propriedade ApplicationID informe um nome para identificar a aplica玢o na tabela de permiss鮡s';
  MsgExceptUsersTable    = 'Na propriedade TableUsers informe o nome da tabela que ser