Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 13-12-2022
Avatar de José Luis Garcí
[José Luis Garcí] José Luis Garcí is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Las Palmas de G.C.
Posts: 1.372
Poder: 23
José Luis Garcí Va camino a la fama
Pendrive de llave de seguridad

Cada programa en su acerca de Tiene un nº de Serie de 12 dígitos, de los cuales 6 son un identificador (cada uno que lo establezca como quiera), que están en la variable fija VFIdentificador, el problema de este sistema es que tengo que cambiar este número mediante un pequeño programa , en cada compilación del programa, creando un registro de a quien ha sido asignado, y por lo tanto teniendo que compilarlo independiente.

El B.D. en la tabla configuración establezco un campo llamado llave, al que le asigno la letra de la unidad.

Luego en un pendrive, creo una carpeta con el nombre LLAVE [Nombre del programa], y dentro añado tres archivos, dos de ellos no sirven para nada y el tercero contiene un código encriptado, que es el número del identificador del programa.
Al pendrive además cambio el nombre del volumen, al valor del identificador.

Al arrancar el programa, lee la tabla configuración, coge la letra del campo LLAVE, y comprueba que este el archivo y que el valor de este una vez desencriptado sea el mismo que el de VFIdentificador, y también que el volumen del pendrive, sea también igual al de VFIdentificador.

Para ello uso otro pequeño programa que me hace automáticamente esto en los pendrive, o casi completamente. Normalmente entrego dos pendrives por si fastidian uno y suelo usar de estos que son muy cortitos, avisándoles que solo son válidos para ese programa, con ese número de serie en exclusiva, con lo que me evito que puedan hacer varias copias, limitando estas a 1 más. Y por supuesto pido el pendrive que está mal para darle uno nuevo, para evitar engaños.

Por cierto los pendrives los tengo marcados en varios sitios, para que no me engañen.
__________________
Un saludo desde Canarias, "El abuelo Cebolleta"
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como puedo pasar este codigo a delphi el codigo de la imagen es codigo python Javier13 Varios 9 16-11-2017 15:41:33
Convertir código "asm" a código Delphi Stringxpx ASM y Microcontroladores 19 11-08-2016 18:12:57
Porque este código me da error (adjunto código) David JAVA 1 12-03-2009 20:07:27
contraer por codigo, cxGrid (+) los nodos abiertos cerrarlos por codigo sakuragi OOP 6 27-07-2005 18:23:07
de codigo VB a codigo Delphi ingel Impresión 2 20-07-2004 14:15:44


La franja horaria es GMT +2. Ahora son las 16:56:19.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi