Unit untKernelRegistro

DescriçãousesClasses, Interfaces, Objetos e RegistrosFunções e ProcedimentosTiposConstantesVariáveis

Descrição

Unidade de Controle de Chaves de licença

Contém métodos para gerenciamento de chaves de registro e licenciamento de software embora o Comanche seja OpenSource, está sob LGPL, e permite que se crie softwares proprietários a partir dele, desde que não sejam outro framework

Visão Geral

Classes, Interfaces, Objetos e Registros

Nome Descrição
record TInformacaoRegistro Informação de usuário registrado (CNPJ) e da chave de registro atual
record TVersaoAplicativo Registro de Versão do Aplicativo

Funções e Procedimentos

function VerificarRegistro(const strCodigoRegistro : string; const strCNPJ : string; const EncryptionKey : TKey; var datExpira : TDateTime) : TStatusRegistro;
function ObterHardwareID : string;
function ObterVersaoArquivo(const strNomeArquivo : string) : string;
function ObterVersaoArquivoEx(const strNomeArquivo : string) : TVersaoAplicativo;
function ObterChaveAtual(const strAppID : string) : TInformacaoRegistro;
procedure LimparChaveAtual(const strAppID : string; const bolCompleto : boolean = True);
procedure ArmazenarChaveAtual(const strAppID : string; const regInfo : TInformacaoRegistro);
function GerarChaveGlobal(const strAppID, strVersao : string) : TKey;
function DialogoAtivacao(const bolSairCompletamente : Boolean = true) : Boolean;

Tipos

TStatusRegistro = (...);

Descrição

Funções e Procedimentos

function VerificarRegistro(const strCodigoRegistro : string; const strCNPJ : string; const EncryptionKey : TKey; var datExpira : TDateTime) : TStatusRegistro;

Efetua a verificação da chave de registro com o CJPN e a chave do Aplicativo

Parâmetros
strCodigoRegistro
chave do registro a ser verificada
strCNPJ
string identificadora do usuário
EmcryptionKey
Chave de Encriptação do registro
datExpira
retorna a data de expiração do aplicativo
Retornos

retorna o status do registro definido por TStatusRegistro

function ObterHardwareID : string;

Obtém o identificador único do computador

function ObterVersaoArquivo(const strNomeArquivo : string) : string;

Retorna a versão do arquivo como string

Parâmetros
strNomeArquivo
caminho completo do arquivo a ser verificada a versão
function ObterVersaoArquivoEx(const strNomeArquivo : string) : TVersaoAplicativo;

Retorna a versão do arquivo no formato do núcleo Extendido

Parâmetros
strNomeArquivo
caminho completo do arquivo a ser verificada a versão
function ObterChaveAtual(const strAppID : string) : TInformacaoRegistro;

Obtém a chave atual no registro do windows

Parâmetros
strAppID
id do aplicativo a ser obtida a informação
procedure LimparChaveAtual(const strAppID : string; const bolCompleto : boolean = True);

Efetua a remoção da informação de registro do software

Parâmetros
strAppID
id do aplicativo a ser limpo
bolCompleto
caso verdadeiro remove completamente todas as informações do registro
procedure ArmazenarChaveAtual(const strAppID : string; const regInfo : TInformacaoRegistro);

Armazena a chave atual no registro

Parâmetros
strAppID
id do aplicativo que será armazenado
refInfo
informações da registração do aplicativo
function GerarChaveGlobal(const strAppID, strVersao : string) : TKey;

Retorna a chave de identificação Global da Aplicação, uma chave global é uma Identificação única do aplicativo que é calculada internamente baseada na versão e outros parametros do aplicativo, juntamente com o id da aplicação

Parâmetros
strAppID
id do aplicativo a ser obtida a chave
strVersao
String da versão do aplicativo a ser gerada a chave Global
function DialogoAtivacao(const bolSairCompletamente : Boolean = true) : Boolean;

Exibe o Dialogo de Ativação do Software e retorna True caso a ativação seja realizada com sucesso

Parâmetros
bolSairCompletamente
Caso verdadeiro ao clicar no botao cancelar do formulário a aplicação é fechada

Tipos

TStatusRegistro = (...);

Status do registro do aplicativo

Values
  • srValido:
  • srExpirado:
  • srInvalido:
  • srPermanente:

Autor

Criada

Data: 22 de Dezembro de 2004

Última modificação

$CheckInDate: 15/06/2007 15:18:45 $