Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   Ayuda con Programa en C++ (https://www.clubdelphi.com/foros/showthread.php?t=61118)

yelian 06-11-2008 23:40:48

Buenos disculpen pero no entendí nada del códe anterior,
si me pudieran explicar un poco mejor me seria útil.

Buenos miren lo que quiero hacer es lo siguiente...

Tengo un Edit (Edit1) donde se debe de poner un nombre y un botón (Aceptar) para que cuando le demos me guarde el nombre que teclearon, ya lo de guardar lo ise pero lo que quiero es que cuando tecleen el nombre no sea preciso dar en el botón solo presionamos ENTRER y ya esta...

Muchas gracias por la Ayuda

coso 06-11-2008 23:42:49

Si. La propiedad 'default' de los TButtons hace que si se pulsa enter en cualquier momento dentro del formulario, se ejecute el 'click' del boton. Algo parecido con la propiedad 'cancel', solo que lo activa la tecla 'escape'. Si lo que quieres es cerrar la ventana, si esta se ha llamado con ShowModal, entonces solo tienes que poner la propiedad ModalResult del Button a algo diferente de mrNone.

yelian 06-11-2008 23:59:17

Muchas gracias por la ayuda coso,
Me funciono a la Perfeccion lo de el boton (Aceptar) y la tecla Enter,
pero no entiendo lo del Escape, eso pudiera utilizarlo cuando esta el programa en ejecucion si presiono Escape me cierra el programa, si pudiera ser eso me gustaria que me pusieras un Ejemplo de como utilizarlo... gracias

coso 07-11-2008 00:01:34

por ejemplo, si quieres q un codigo se te ejecute al pulsar escape, entonces pones su propiedad 'cancel' a true. Es util por ejemplo para cerrar ventanas de dialogo con un simple escape sin tener que usar el raton. Mira la ayuda F1, encontraras mas informacion. saludos.

yelian 07-11-2008 00:22:00

Muchas gracias el codico ya me esta funcionando a la perfección gracias a ustedes...
Si encuentro otras duda que tenga mientras perfecciono el programa la planteo...

muchas gracias...

yelian 12-11-2008 01:52:27

Hola a todos de nuevo, ahora tengo otra duda lo que pasa es que no se como encriptar un texto, lo e visto en otros temas pero no lo entiendo muy bien, lo que yo quiero hacer es cifrar una contraseña que teclea el usuario,

Ejemplo:

- Tengo un Edit y un Button
- Para inicial mi aplicacion es necesario introducir un password en el Edit
- Cuando le doy al botton me decifre el password guardado en un txt y compare el resultado con el que el usuario tecleo si es igual entra al programa sino muestra un Mesage de Error...

* Yo ya tengo ello lo de la comparacion pero no se como cifrar y decifrar el texto si me pudieran ayudar se lo agradeseria mucho...

coso 12-11-2008 10:08:15

Hola de nuevo. Esta pregunta debe ir en un hilo nuevo. Si miras en la seccion trucos o usas el buscador del foro encontraras varios ejemplos. saludos.

yelian 13-11-2008 00:39:55

Gracias los buscare

yelian 13-11-2008 01:05:08

Trate de buscar mi duda en el Buscador pero no tengo acceso a la paguina que va despues que tu pones buscar...
bueno tratare de poner mi duda en otro Hilo para ver si la puedo solucional que ustedes me dicen .

escafandra 13-11-2008 01:08:40

Hola yelian, como dice coso los métodos para encriptar son numerosos y los puedes encontrar en este foro y en la web. Si lo que deseas es un método simple, puedes usar un algoritmo xor que es simétrico.

Te dejo aquí una muestra de una rutina simple pero eficaz de encriptación XOR de 64 bits que permite encriptaciones parciales aditivas, es decir encriptar, por ejemplo, un fichero grande a medida eque se escribe por partes en el disco....

Saludos.

yelian 13-11-2008 23:14:48

Gracias por la ayuda,
aaa y lo que dije que no tenia acceso al buscador no es sierto es el explorador mio que tenia problema, pero ya lo solucione, pienso buscar bastante sobre este tema que me gusta...

yelian 13-11-2008 23:20:21

escafandra si no te es molestia de explicarme un poco sobre el ejemplo que me pusiste, lo que pasa es que tengo algunas duda sobre ese metodo de encriptacion XOR que me pusiste antreriol....

gracias de antemano.

escafandra 14-11-2008 14:44:32

Bueno, no es dificil de usar.
1º Define un buffer, puede ser con un contenide texto o binario.
2º Define una clave.
3º Encríptalo.

Código:

char Buffer[] = "Este texto se va a encriptar."
DWORD Clave = 0x76349714; 
Crypt(Buffer, l, (char*)&Clave, 0);  // Encripta el Buffer

Si quieres hacerlo por partes, para escribir en un archivo...., cada parte:

Siendo HFile el manejador de un fichero abierto y
int WritePos lo ya escrito en el fichero

Código:

HFile = open(FileName.c_str(), O_CREAT | O_WRONLY | O_BINARY);
.
.
.
if(HFile)
if(WritePos < Text.Length()){
    int Mod = WritePos%8;
    int l = Text.Length()-WritePos;
    BYTE *buffer = new BYTE[l+1];
    buffer[l] = 0;
    strcpy((char*)buffer, Text.c_str()+WritePos); // Hacemos una copia
    Crypt(buffer, l, (char*)&Clave, Mod);        // Encripta el buffer
    write(HFile, buffer, l);
    WritePos  += l;
    delete buffer;
}

El resultado, es binario, no es texto, por lo que se guardará en un archivo abierto en modo binario.

El buffer pasado como puntero se encriptam, por lo que si lo que se quiere en encriptar una copia y retener el original, deberá hacerse la misma antes de llamar a la función, y pasarle el puntero adecuado.

Experimenta.

Saludos.

escafandra 14-11-2008 22:48:47

Ahora te explico un poco el algoritmo que he usado:

La encriptación Xor es fácil de implementar y es simétrica. La misma función y la misma clave sirven para encriptar y desencriptar.

Se basa en hacer una operación binaria XOR entre un dato y una clave. Piensa en este ejemplo binario:

Dato = 10001000
Clave = 01000100
10001000 XOR 01000100 = 11001100; Dato Encriptado
11001100 XOR 01000100 = 10001000; Dato Desencriptado

si ampliamos el nº de bits tendremos una operación XOR mas amplia... Esta rutina lo amplia a 8*8 = 64 bits.
Código:

void
Crypt(void *Source, int Size, char* Clave, int Mod)
{
  BYTE *source = (BYTE*)Source;  // Convierto el puntero Source a BYTE*
  BYTE clave[8];                // Reservo para Clave 8 BYTES
  int lClave = strlen(Clave);    // Encuentro el tamaño de la clave si es una cadena
  for(int n=0; n<8; n++)        // Fuerzo a que la clave sea de 8 bytes máximo
    clave[n] = Clave[n%lClave];

  for(int n=0; n<Size; n++, Mod++){
    source[n] ^= clave[Mod%8];  // Encripta hasta conseguir hacerlo con 8 bytes
                                  // que es el tamaño establecido para la clave....
                                  // ^ Es el operador XOR en C
  }
}

Espero que así lo entiendas mejor.
Experimenta.

Saludos.

yelian 15-11-2008 01:37:57

Gracias por la pasiencia y la explicacion seguro que experimentare, despues les cuento como me fue

* si no les vuelvo a escribir es que se me exploto el celebro... (Broma)



Muchas Gracias por la ayuda....


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

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