[Asinkrit]

Я так понимаю, вы описали часть синтаксиса запроса на вставку строки в таблицу, а нужен запрос на проверку существования записи в таблице пользователей, к примеру:

Код:

  select user_id, user_fio, user_role
  from users  
  where user_login = :login
     and user_password = :password

Открываем данный запрос, через Open; или Active:=true; и смотрим, если есть хотя бы одна запись в возвращаемом результате, то выполняем вход в программу, запоминая данные пользователя (к примеру, ФИО и роль).

Код:

    with qryLogIn do
      begin
      if Active then Close;
      ParamByName('login').AsString:=teLogin.Text;
      ParamByName('password').AsString:=tePassword.Text;
      Open;
      if RecordCount > 0 then
        begin
        First;
        DM.UserName:=FieldByName('user_fio').AsString;
        DM.UserId:=FieldByName('user_id').AsInteger;
        DM.RoleId:=FieldByName('user_role_id').AsInteger;
        //DM - DataModule, именно там лучше хранить данные такого рода и использовать во разных местах программы
        Close;
        ModalResult:=mrOk; //в данном случае используется Splash-окно, именно здесь осуществляем вход в программу
        end
          else
            begin
            ShowMessage('Введены неправильно логин или пароль.');
            Close;
            end;
     end;

А поиском, вы похоже, даже не пользовались, подобных тем в интернете и на данном форуме обсуждалось много раз.

Эх, DJ PhoeniX, быстрый ты однако