Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Proteger mi programa (https://www.clubdelphi.com/foros/showthread.php?t=19587)

rruffino 18-03-2005 19:11:13

Proteger mi programa
 
Buenas a todos. Estoy haciendo un sistema y necesito que me de la posibiliad de "desactivarlo" en un determinado momento, es decir, como si se quedara sin la licencia para funcionar. Estuve pensando y buscando pero no me doy cuenta como hacerlo. Desde ya les doy las gracias.
Saludos, Román.-;)

José Arce 18-03-2005 21:23:01

Hola rruffino, ¿cuando quieres desactivarlo?, por aperturas, por tiempo, en una fecha en concreto como seguro de cobro,..., danos algún dato más.

Un saludo José Arce

rruffino 21-03-2005 18:15:30

Hola José, gracias por interesarte. El tema es que lo quiero desactivar para asegurarme el cobro, la idea seria por fecha, pero la verdad que nunca he hecho esto y necesito hacerlo, asi que cualquier sugerencia la voy a tener muy en cuenta. Muchas gracias:D

Investment 21-03-2005 18:27:42

Bueno, podrías hacer algo como esto en el inicio de tu aplicación:

Código:

if DateToStr(Date)>'15/4/2005' then
 begin
  ShowMessage('No tiene permisos para ejecutar la aplicación')
  Application.Terminate;
 end;

Esto impediria que tu aplicación se ejecutase a partir del 16 de abrir de 2005, pero si el usuario modifica la fecha del reloj del ordenador podría usarlo de nuevo sin problemas.

rjsitruiz 21-03-2005 18:38:57

Para evitar que cuando te cambien la hora del sistema... tu programa no siga trabajando, pues crear un fichero .ini en donde guardes cada vez que cierres el programa la fecha del sistema, y cuando te lo ejecuten, verifique la fecha del .ini. Otra opcion seria guardar los datos de hora y fecha en el registro de Windows... lugar bastante grande, para que puedan buscar esos datos y borrartelos.


Saludos

rruffino 21-03-2005 18:40:05

Gracias Investment por tu respuesta, el tema es ese, que me modifique la fecha y lo sigue usando. No hay o conoces alguna otra manera de que esto no pueda ocurrir? Desde ya muchas gracias por dedicar tu tiempo.
Saludos, Román:D

Investment 21-03-2005 18:52:03

Bueno, por haber hay muchas formas es cuestion de estrujarse un poco el cerebro. La solucion de rjsitruiz es bastante buena aunque tambien te pueden modificar el fichero ini y listo. Y entrar en el regedit pues igual.

No se, otra que se me ocurre es que el programa necesite un fichero en algun directorio para poder ejecutarse. Puedes controlar que el dia que quieras el programa borre ese fichero y ya no pueda volverse a usar.

Código:

if not FileExist(C:\directorix\archivoY.txt) then
 begin
    ShowMessage('No tiene permisos para ejecutar la aplicación')
  Application.Terminate;
 end;
 
 if DateToStr(Date)='15/4/2005' then
  DeleteFile(C:\directorix\archivoY.txt))


Asi, la primera vez que el dia 15 de abril ejecuten el programa, podrán acceder a el, pero si lo cierran ya no podrán volver a ejecutarlo.

rruffino 21-03-2005 18:56:07

Muchachos, muy buenas las dos opciones, l verdad que para mas seguridad las voy a poner a las dos en practica. Muchas gracias por la mano

Saludos, Román.-:D

efelix 21-12-2006 17:20:49

Hola rjsitruiz soy efelix, que tengo el mismo problema, me puse a buscar en el foro y encontre esta respuesta tuya. Hay algunas cosas en delphi que no domino pues soy algo nuevo en el trabajo con el mismo. Podrías si no es mucha molestia explicar mas al detalle esto de los ficheros .ini y ejemplificar como lo hizo Investment, te reitero si no es molestia, ambas respuestas me han servido de ayuda pero desde el punto de vista teórico, me haria falta algún ejemplo. Gracias.


La franja horaria es GMT +2. Ahora son las 21:23:01.

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