Цитата:
|
Сообщение от Yurgen
А можно кучосек кода, куда пароль вводится, где хранится и тп.
|
Куда хочешь - в edit например.
Хранишь - МД5 хеш от пароля - в файле - тхт достаточно.
Форма, edit , 2 кнопки
1я-проверить пароль.
2я кнопка - сохранить.
PHP код:
procedure TForm1.Button1Click(Sender: TObject);
var
tf:textfile;
s:string;
begin
assignfile(tf,'pa.txt');
reset(tf);
readln(tf,s);
closefile(tf);
if s=md5s(edit1.Text) then
begin
messageBox(0, 'Пароль верен, я мего прогер)).', 'Ypa', MB_OK);
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
tf:textfile;
s:string;
begin
assignfile(tf,'pa.txt');
rewrite(tf);
s:=md5s(edit1.Text);
writeln(tf,s);
closefile(tf);
end;
Ясно что без проверок и т.д. - сойдет как пример.
Если кому интересно, могу скинуть немного улучшенный метод с солью);