For få parametre i SQL-forspørgsel

Når jeg trykker på login-knappen i mit program køres følgende kode:

procedure TForm1.Button2Click(Sender: TObject);
var
  brug,pass: string;
begin

brug := edit1.text;
pass := edit2.text;

if (Length(brug) < 4) OR (Length(pass) < 4) then
  begin
    showmessage('Skriv brugernavn og adgangskode!');
  end
else
  begin
    ADOQuery1.SQL.clear;
    ADOQuery1.SQL.Add('SELECT * FROM bruger WHERE brugernavn = '+brug+' AND adgangskode = '+pass);
    ADOQuery1.Active := True;
    ADOQuery1.First;

    if not (ADOQuery1.EOF) then
      begin
        form1.Hide;
        form2.Show;
      end
    else
      begin
        showmessage('Du har indtastet forkert brugernavn eller adgangskode!');
      end;
  end;

end;

Men jeg får fejlen:

Project Project1.exe raised exception class EOleException with message '[Microsoft][ODBC Microsoft Access-driver] Der er for få parametre. Der var ventet 2'. Process stopped. Use Step or Run to continue.

Hvad har jeg gjort galt ?