Ver Mensaje Individual
  #1  
Antiguo 16-02-2009
pablopessoa pablopessoa is offline
Miembro
 
Registrado: may 2008
Ubicación: Argentina
Posts: 162
Reputación: 17
pablopessoa Va por buen camino
Problemas al escribir el registro de windows

Hola gente forista!!
Bueno les comento el problema que tengo.
Estoy haciendo una aplicacion que tendra una licencia y un sistema de logueo, entonces quiero guardar ( en la instalacion) los datos necesarios para hacer esto. El problema es que no quiero guardarlos como "reg.WriteString" por que de esta manera si entras en el registro de windows podes leerlas y yo no quiero eso. Entonces pense en poner todo dentro de un registro (ejemplo a continuacion) y guardar el registro como Binary y despues recuperar el registro con los datos. Yo hago este codigo para guardar los datos :
Código Delphi [-]
var
    reg2:TRegistry;
    opcion:TOpciones;
begin
    reg2:= TRegistry.Create;
    reg2.CreateKey(clave);
    reg2.OpenKey(clave,true);
    opcion.telefono:= Etelefono.Text;
    opcion.nombre:=  Enombre.Text;
    opcion.direccion:= Edireccion.Text;
    opcion.ciudad:=  Eciudad.Text;
    opcion.password:=  Epassword.Text;
    opcion.limiteprueba:= '5';
    opcion.codigo:= 'temp';
    reg2.WriteBinaryData('datos',opcion, SizeOf(opcion));

El problema es que cuando hago :

Código Delphi [-]
temp:=reg.ReadBinaryData('datos',opciones, SizeOf(opciones));

esto me retorna un entero y no el registro Topciones.
Podrian ayudarme a corregir esto? Como podria guardar los datos encriptados ( como binary) y recuperarlos bien para que no sea tan facil modificarlos??
Muchas gracias por tomarse el tiempo de leer mi post.
Un saludo a todos!!
Responder Con Cita