Ayuda con Encriptamiento de Texto

[yelian]

Hola a todos de nuevo tengo una duada,
Lo que pasa es que no se como boy a hacer lo que quiero,
En otro Hilo de este Foro medieron estos codicos para encriptar un texto, lo cogi y lo puse a mi gusto,
Pero lo puedo utilizar nadamas que en Consola quisiera que me ayudaran para utilizarlo en Visual ...

Codigo que me dieron (modificado a mi gusto):

char frase[100];
int longitud,i;
cout<<"Teclee un tecto para encriptarlo"<<endl;
cin.getline(frase,100);
longitud=strlen(frase);
for (i=0;i<longitud;i++){
frase[i]=frase[i]+3;
}
cout<<"El texto encriptarlo es "<<endl;
cout<<frase<<endl;

El problema que tengo es que lo que quiero encriptar es lo que tecleen en un Edit pero no se como voy a hacerlo...

Si me pudieran ayudar se lo agradesceria mucho...

[donald shimoda]

Empezado por yelian

El problema que tengo es que lo que quiero encriptar es lo que tecleen en un Edit pero no se como voy a hacerlo...

Si me pudieran ayudar se lo agradesceria mucho...

Puedes colocar un botón que dispare el procedimiento de encriptado, pasandole como parámetro la propiedad Text del edit. O bien en el evento onexit del edit.

Por cierto si quieres encriptar de verdad, usa Dcrypt.

Saludos

[yelian]

Hola donald shimoda

**Puedes colocar un botón que dispare el procedimiento de encriptado, pasandole como parámetro la propiedad Text del edit. O bien en el evento onexit del edit.**

-Como puedo hacer esto...

**Por cierto si quieres encriptar de verdad, usa Dcrypt**

-Que es "Dcrypt" no tengo idea de que es, si me pudieras explicar un poco sobre el te lo agradeseria mucho

gracias por la ayuda

[[Lepe]]

No me seas vago, usa google http://www.winsite.com/bin/Info?500000031320

Igual que tu tiempo es valioso... el nuestro también

Saludos

[slim_shaddy]

hay funciones encriptamiento incluso con sodigos irreversibles que son muy eficientes si lo que quieres hacer para encriptar es eso pues usa cualquier metodo de ordenamiento y varias la posicion del arreglo de caracteres hay cosas muy chulas en google
suerte

[donald shimoda]

Empezado por Lepe

No me seas vago, usa google http://www.winsite.com/bin/Info?500000031320

Igual que tu tiempo es valioso... el nuestro también

Saludos

Aun más directo, a la casa del proprio creador de la criatura.

Espero te sirva.

Saludos.

[donald shimoda]

Empezado por yelian

Hola donald shimoda

**Puedes colocar un botón que dispare el procedimiento de encriptado, pasandole como parámetro la propiedad Text del edit. O bien en el evento onexit del edit.**

-Como puedo hacer esto...

Usando el código que pasaste:

Código Delphi [-]
function Encriptar(aStrEncriptar: String): string; 
var   
  i : byte; 
begin   
  for i:=1 to strlen(aStrEncriptar) do   
  begin     
     result := aStrEncriptar[i]+3;   
  end; 
end;

En el onexit del botón suponiendo que se llame MyButton y que lo quieras guardar encriptado en aStrDestino

Código Delphi [-]
  aStrDestino := Encriptar(MyButton.Text);

enjoy!

[yelian]

Gracias donald shimoda

Pero como calturo lo escrito en un Edit para encriptarlo con el code que puse anteriolmente,

aaa si puedes ponerme los code para C++ me seria de mucha utilidad ya que paso mucho trabajo al llebar los codigos de Delphi a C++,
Si los sabes en Delphi y no los sabes en C++ no importa postealos igual ya encontrare la forma de llebarlos a c++...

y para los otros que me respondieron si tubiera acceso a todas las paguinas de Interned no los molestaria tanto con mis dudas, buscaria hasta encontrar mi duda, lo que pasa es que tengo muchas paguinas restringidas, dentro de ellas los linck que me pusieron anteriol...

Gracias a Todos y disculpen la molestia

[donald shimoda]

Empezado por yelian

Gracias donald shimoda
Pero como calturo lo escrito en un Edit para encriptarlo con el code que puse anteriolmente,

No acabo de explicarlo?

**Puedes colocar un botón que dispare el procedimiento de encriptado, pasandole como parámetro la propiedad Text del edit. O bien en el evento onexit del edit.**

Empezado por yelian

y para los otros que me respondieron si tubiera acceso a todas las paguinas de Interned no los molestaria tanto con mis dudas, buscaria hasta encontrar mi duda, lo que pasa es que tengo muchas paguinas restringidas, dentro de ellas los linck que me pusieron anteriol

Bendita revolución...

[yelian]

Bueno despues de tanto tiempo encontre una forma de encriptar un texto Tecleado en un Edit ..
.
Les agradesco por todo sus aporte que siempre son de mucha ayuda...

No se si lo que ise esta bien pero por lo menos me funciona bien, se que es un encriptamiento sencillo pero es lo que me hacia falta (algo no tan complicado y que sea facil de entender) e llegado a este code gracias a a la ayuda de todos ustedes,

Rectifiquenme si el code tiene algun error y si hay alguna forma de perfercionarlo...

Code:
------
int largo;
largo=Edit1->Text.Length();
char* testo=new char[largo];
strcpy(texto,Edit1->Text.c_str());
for (int i=0;i<largo;i++){
texto[i]=texto[i]+3;
}
Edit2->Text=texto;


Saludos...

[[escafandra]]

Te dejo un ejemplo algo mas complejo pero muy simple. No recuerdo si ya publiqué en el foro.

// Rutina de encriptación Xor. 
// La misma rutina encripta y desencripta. 
// Clave clave en modo texto que se tratará como de 8 caracteres, 64 bits 
// Mod es el módulo restante para encriptaciones parciales si no desea usarse,
// debe ser nulo.
// Si se encripta un buffer por partes, Mod = Size_encriptado%8 
// donde Size_encriptado es el tamaño total de lo encriptado hasta ese momento. 
// Mod corrige el punto de comienzo del nuevo bloque a encriptar. 
// BYTE es unsigned char 
 
void 
Crypt(void *Source, int Size, char* Clave, int Mod) 
{ 
   BYTE *source = (BYTE*)Source; 
   BYTE clave[8]; 
   int lClave = strlen(Clave); 
   for(int n=0; n<8; n++) 
     clave[n] = Clave[n%lClave]; 
 
   for(int n=0; n<Size; n++, Mod++){ 
      source[n] ^= clave[Mod%8]; 
   } 
}

Puedes encriptar cualquier cosa.

Saludos.