Borland C++ Builder FAQ
составлен по материалам форума
на sources.ru
AnsiString XOR_Crypt(AnsiString in, AnsiString pass)
{
AnsiString out;
for (int x=1;x<in.Length()+1;x++)
{
out += (char)(in[x] ^ pass[x%pass.Length()+1]);
}
return out;
}
Для шифрования и расшифровки алгоритм один и тот же.Edit1->Text = XOR_Crypt("VVV\x0FRNTSBDR\x0FST","!");
P.S. кто угадает, что окажется в Edit1?