SQL Tutorial gesucht

[SKolberg]

hallo,
so weit funktioniert alles ganz gut aber ich verstehe einen fehler nicht... ich habe einige testbenutzer eingerichtet:

user passwort

admin test0
marketing test1
bearbeiter test2
betrachter test3

falls aber 2 benutzer genau das gleiche passwort haben bekomme ich bei beiden die meldung benutzername falsch, kann das aber nicht nachvollziehen da es doch eigentlich egal sein sollte und er nur überprüft ob die eingaben übereinstimmen..

Delphi-Quellcode:

procedure TSDIAppForm.ZConnectionAfterConnect(Sender: TObject);
begin
  Connect.Enabled := False;

  begin
    begin
  ZConnection1.Connect;
  ZQuery1.SQL.Text := 'SELECT * FROM user WHERE username = ' + QuotedStr(user.Text);
  ZQuery1.Open;
      end;
  ZConnection1.Connect;
  ZQuery1.SQL.Text := 'SELECT * FROM user WHERE userpasswd = ' + QuotedStr(pass.Text);
  ZQuery1.Open;
      end;

      if user.Text = (ansilowercase(username.text))  then
  begin
      if pass.Text = Passwort.Text then
      Hauptmenue.ShowModal
      else
      MessageBox(self.Handle, 'Passwort falsch, bitte überprüfen Sie ihre Angaben!', 'Fehler!', 48 or MB_OK);
      pass.clear;
      user.Clear;
  end
  else
  MessageBox(self.Handle, 'Benutzername falsch, bitte überprüfen Sie ihre Angaben!', 'Fehler!', 48 or MB_OK);
  user.clear;
  pass.Clear;
  end;

vielen dank im voraus, Steve