Здравствуйте форумчане!
Я пытался сделать что то типо авторизации но столкнулся с ошибкой!
Вот код программы:
Код:
If (Edit1.Text<>'') and (Edit2.Text<>'') then
else ShowMessage('Недопустимы пустые поля');
If ADOTable1.Locate('Логин',Edit1.Text,[loCaseInsensitive, loPartialKey])
and ADOTable1.FieldByName('Пароль').AsString=Edit2.Text then
Showmessage('Получилось!')
else Showmessage('Не получилось!!!!!!');
а вот ошибка-(Incompatible types: 'String' and 'Boolean')
Курсор появляется после слова (AsString)
Что делать? Как избавится от ошибки?