Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-08-2011
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is online now
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.504
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por Tortuguica Ver Mensaje
Lo de la memoria flash es una medida de seguridad para evitar que copien la aplicación. Pongo una condición en cada procedimiento de la aplicación y, si no está conectada la memoria, se cierra la aplicación. Igual es un cutrerío de medida de seguridad, pero es lo único que se me ha ocurrido.
Sólo por curiosidad, ¿La memoria debe tener algo dentro? ¿Algun fichero? ¿Algun código?
¿Cómo detectas la memoria? ¿Debe estar en alguna unidad especial? ¿En cualquier USB?
¿La distribuyes con la aplicación?

Me interesa este tema.

Otra cosa; Ninguna medida es "cutrerío" si tiene su razón de ser y funciona correctamente.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #2  
Antiguo 10-08-2011
Tortuguica Tortuguica is offline
Miembro
 
Registrado: sep 2010
Ubicación: Elche, España
Posts: 46
Poder: 0
Tortuguica Va por buen camino
Cita:
Empezado por Neftali Ver Mensaje
Sólo por curiosidad, ¿La memoria debe tener algo dentro? ¿Algun fichero? ¿Algun código?
¿Cómo detectas la memoria? ¿Debe estar en alguna unidad especial? ¿En cualquier USB?
¿La distribuyes con la aplicación?

Me interesa este tema.

Otra cosa; Ninguna medida es "cutrerío" si tiene su razón de ser y funciona correctamente.

No, no debe tener nada. La aplicación detecta (o no) el número de serie de la memoria flash. Por ejemplo, si el número de serie fuera 1000, el código sería:
Código:
function keyproof(): Boolean;
var
   contador: Byte;
   MaximaLongitud, indicadores:cardinal;
   unidad, Etiqueta: string;
   NumeroSerie, unidades: LongWord;
begin
    Result:=False;
    unidades:= GetLogicalDrives;
    contador:=0;
    while (contador<=31) and (not Result) do
    begin
        unidad:=Char(Contador+Ord('A')) + ':\';
        if (unidades And Trunc(Power(2, Contador))) <> 0 Then
            GetVolumeInformation(PChar(unidad), PChar(Etiqueta), MAX_PATH, @NumeroSerie, MaximaLongitud, indicadores, Nil, 0);
        if NumeroSerie=1000 then
            Result:=True
        else
            inc(contador);
    end;
end;
¿Tú crees que es una buena idea para evitar el pirateo? Un saludo.
Responder Con Cita
  #3  
Antiguo 10-08-2011
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is online now
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.504
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por Tortuguica Ver Mensaje
¿Tú crees que es una buena idea para evitar el
pirateo?
Bueno, hay que saber más sobre el sistema.

¿A quien va dirijido?
=> Pensando en si eleva el coste, si se va a instalar en muchos equipos, si funciona en red, si la llave la debe tener cada uno o la vendes tú,...

¿Cómo sabe la aplicación cual es el número correcto?
=> Pensando en que se pueda piratear por otros medios, utilizar discos virtuales o atacando a otro lugar que no sea la llave; habría que ver dónde se guarda ese número.
=> Ten en cuenta que modificar el número de serie de un disco/unidad es sencillo

¿Qué opciones hay si pierdes la llave?
=> Si no la he traído, si la he olvidado, si la he perdido, si la he tenido que formatear, si se ha estropeado,...

Sin saber más detalles, es difícil...
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #4  
Antiguo 10-08-2011
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 4.232
Poder: 24
newtron Va camino a la fama
Por si os sirve de algo yo lo que hago es pedir una clave en función del número de serie del disco duro y si la clave es correcta en un recóndito rincón del registro de windows pongo una marca para activar el programa.

Es una forma muy simple y poco segura de proteger mis programas pero mis clientes no se dedican a intentar piratearlo por lo que con que salte si instalan un terminal nuevo en la red o lo pasan a otro ordenador ya me vale y tiene la ventaja de que no me cuesta nada y es muy simple de implementar.

Saludos
__________________
Be water my friend.
Responder Con Cita
  #5  
Antiguo 10-08-2011
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is online now
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.504
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por newtron Ver Mensaje
...y tiene la ventaja de que no me cuesta nada y es muy simple de implementar.
+1

Esa, aunque parezca simple, es uno de los paradigmas de los sistema de proteccion.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #6  
Antiguo 10-08-2011
Tortuguica Tortuguica is offline
Miembro
 
Registrado: sep 2010
Ubicación: Elche, España
Posts: 46
Poder: 0
Tortuguica Va por buen camino
Bueno, la verdad es que no creo que mi aplicación vaya a tener demasiado éxito. Para empezar, ya veremos si algún día la acabo, y si eso ocurre, ni estará dirigida al gran público ni pienso ponerle un precio exorbitado. Quiero decir que no va a ser la aplicación que todos quieren tener en su PC, como si fuera Windows u Office, por ejemplo, así que no me imagino a nadie devanándose los sesos por tener pirateada una aplicación que realmente necesite y que pueda conseguir legalmente por alrededor de 30 euros. Por supuesto, no tengo ni idea de sociología o de estudios de mercado, así que llego a todas las conclusiones a partir de mi propio comportamiento. Vaya rollo os he metido Bueno, gracias por todas las ideas y sugerencias. Un saludazo.
Responder Con Cita
  #7  
Antiguo 10-08-2011
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is online now
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.504
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Por lo que explicas yo optaría por una solución (similar a la que comentas) pero que no necesite la llave USB, ya que le veo más inconvenientes que ventajas, para el caso que planteas.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Comportamiento de componentes MDO peccatum Firebird e Interbase 6 18-10-2007 21:08:42
Insólito caso de mujer en estado vegetativo Robert01 La Taberna 0 08-03-2007 19:39:46
Comportamiento de controles con evento BeforeInsert Johnny Q OOP 3 07-07-2005 22:36:50
Insolito, no encuentra la tabla!! Mauro.NET Conexión con bases de datos 1 29-03-2005 21:30:56
Comportamiento de los Packages unicode OOP 2 07-09-2003 19:22:38


La franja horaria es GMT +2. Ahora son las 15:59:59.


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