|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
пароль при запуске
добрый вечер всем!
у меня такая проблема: при запуске появляется форма с запросом пароля(Pass) и имени(Name). а список имен и пароля содержится в справочнике. как сделать проверку пароля и имени из справочника? делаю так: if (DM.tblPsevda['Psevda']Name.Text=DM.tblPsevda['Psevda']) and (Pass.Text=DM.tblPsevda['Psevda']) then begin frmPass.ModalResult:=mrOk; end else begin MessageDlg('Error User or Password!', mtInformation, [mbOk], 0); end; но что-то не так работает все равно(( |
#2
|
|||
|
|||
Цитата:
меняем на Код:
if (User.Text=DM.tblPsevda['Psevda'].ASString) and (Pass.Text=DM.tblPsevda['Psevda'].ASString) then begin frmPass.ModalResult:=mrOk; end else begin MessageDlg('Error User or Password!', mtInformation, [mbOk], 0); end; По идее ... А User это Edit )))))) |
#3
|
|||
|
|||
ой, простите я не так написала))
на самом деле у меня также написано в проге как вы мне написали, но все равно почему-то пишет что пароль неверный(( |
#4
|
|||
|
|||
Попробуйте проверить данные из базы данных через функцию Trim() или RTrim(), т.к. БД может добавлять пробелы.
|