кол-во полей в наборе а не записей.(!!!)
Используйте repeat until или While для прохода по записям
например так:
Код:
if not adoquery1.isEmpty then begin
repeat
adoquery1.next;
until adoquery1.eof;
end;
Вы уверены что тут or ?
Код:
if ((login_txt.Text <> tbl1.FieldByName('Login').AsString) or (passw_txt.Text <> tbl1.FieldByName('Password').AsString)) then
begin
Предполагаю что вы делаете форму авторизации... если да то проще сделать все ОДНИМ запросом и вернуть статус им же
