Ну md5 это круто, есть проще алгоритмы шифрования, например простой XOR остановит любого не связанного напрямую со взломом программ...
http://www.delphisources.ru/pages/fa...rithm_xor.html
Я например использовал такую реализацию...
Код:
//XOR алгоритм шифрования
function TProgramm.Coding(Text : String):String;
var
key, longkey: string;
i: integer;
toto : char;
begin
longkey := '';
key := 'ADSF';//Вместо такого ключа используй логин
for i := 0 to (length(text) div length(key)) do
longkey := longkey + key;
for i := 1 to length(text) do
begin
toto := chr((ord(text[i]) xor ord(longkey[i]))); // XOR алгоритм
result := result + toto;
end;
end;
Алгоритм реализации...
Считываешь строку из файла(реестра)...
Прогоняешь через XOR...
Сравниваешь результат с эталоном...
Работаешь...
При изменении пароля(логина)...
Прогоняешь новую строку через XOR...
Сохраняешь в файле(реестре)...
Таким образом в файле(реестре) хранится не сам пароль, его зашифрованный вариант...
Повторюсь, это самая простая реализация...