Цитата:
Сообщение от elle
добрый вечер всем!
у меня такая проблема: при запуске появляется форма с запросом пароля(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;
но что-то не так работает все равно((
|
меняем на
Код:
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 ))))))