![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как хранить пароли? [D7, XP]
Alex_Ford © (2008-11-19 22:41:00)Добрый вечер!
Уважаемые мастера, подскажите пожалуйста, как в таблице хранить пароли, и осуществлять проверку
Я попытался так, но проверка осуществляется как бы по принципу "либо-либо"...... даже не знаю как правильно поставить вопрос.
Код:
procedure TForm5.SpeedButton1Click(Sender: TObject);
var i,j: integer;
begin
if not (table1.Locate('user',edit1.Text,[loCaseInsensitive]))xor
(table1.Locate('password',edit2.Text,[loCaseInsensitive]))then
begin
form2.showmodal;
form1.close;
Eraser (2008-11-19 22:45:00) [21]в таблице не надо хранить пароли. лучше хранить хэши паролей.