Поиск данных по таблице в базе данных

[Awesome96]

Доброго времени суток уважаемые форумчане, нужна ваша помощь. Я взаимодействую с базой данных Access с помощью компонентов ADOQuery, ADOConnection и DataSource. В базе данных есть 2 таблицы: Таблица1 (состоит из 3-ех столбцов: в первом хранятся id, во втором логины, а в третьем пароли) и Таблица2. Есть 3 переменные Login, Pass и ID. Нужно чтобы при нажатии на кнопку программа проверила столбцы с логинами и паролями Таблицы1 из базы данных на равенство значениям переменных Login и Pass и если в бд найдется строка со значением логина и пароля равным значениям переменным Login и Pass, то его ID (первый столбец) занесся в переменную id.

[Sciv]

SQL-запрос (ADOQuery1):

SELECT ID FROM [Таблица1] WHERE LOGIN=:l AND PASS=:p

и далее:

id:=ADOQuery1.FieldByName('ID').Value;

Или так:

Table1.First;
While not table1.eof do begin
  if (Table1.FieldByName('LOGIN').AsString=...) and (Table1.FieldByName('PASS').AsString=...) then begin
    id:=Table1.FieldByName('ID').Value;
    break;
  end;
  Table1.Next;
end;

Или через функцию locate