En efecto, mi mensaje llegó después del tuyo sin yo saberlo. Por eso es que parece que no lo leí. Pido disculpas.

// Saludos

Aquí sigo pero no entendí :confused: ¿lítote?

// Saludos (si es que sigues en Cantabria :) )

Si sigues frente al monitor, te aclaro que es una figura de dicción que se comete cuando se niega algo para atenuar su significado. Es decir retórica, lo contrario a la programación.

Un Saludo.

Vean mi Nuevo hilo sobre seguridad porque esto se ha desvirtuado por completo.

Ante ke kualkier cosa pase... y viendo ke alguno de ustedes puso ke ya no habia regresado digo lo siguiente: NO HABIA ESCRITO NADA DEBIDO A KE EL HILO FUE MOVIDO DE FORO... PRIMERO PENSE KE LO HABIAN BORRADO :eek:ASI KE LE ENVIE UN MAIL A CADETILL(KE ERA EL MODERADOR DEL FORO EN EL KE ESCRIBI EL HILO) Y ME DIJO KE LO HABIA CAMBIADO PARA ACÁ... ASI KE DISCULPEN:D :p

Agradezco todas y cada una de las opciones ke me dan en este hilo, aunke creo ke el tema ha causado cierta polémica... Buscaré e intentaré aplicar cada una de las opciones ke me brindan y veré cual es la ke me conviene más... Aunke lo ke notó después de leer todo lo ke escribieron es ke no hay una técnica al 100% segura asi ke trataré de aplicar no solo una (claro, si es ke puedo plicar mas de una a la vez...:o).

Muchas gracias y salu2...

puedes probar este algoritmo.
yo no lo he probado, asi que no conosco muy bien cuan seguro sea.
espero te sirva

program Crypt;


uses WinCRT;

const
C1 = 52845;
C2 = 22719;

function Encrypt(const S: String; Key: Word): String;
var
I: byte;
begin
Result[0] := S[0];
for I := 1 to Length(S) do begin
Result[i] := char(byte(S[i]) xor (Key shr 8));
Key := (byte(Result[i]) + Key) * C1 + C2;
end;
end;

function Decrypt(const S: String; Key: Word): String;
var
I: byte;
begin
Result[0] := S[0];
for I := 1 to Length(S) do begin
Result[i] := char(byte(S[i]) xor (Key shr 8));
Key := (byte(S[i]) + Key) * C1 + C2;
end;
end;

var
S: string;
begin
Write('>');
ReadLn(S);
S := Encrypt(S,12345);
WriteLn(S);
S := Decrypt(S,12345);
WriteLn(S);
end.