求解释代码

阁龙1427

求解释这段代码：

procedure TfrmLogin.btnLoginClick(Sender: TObject);

var

  SQL :string;

begin

  SQL :='SELECT * FROM [User] WHERE UserID='

       +Quotedstr(edtUserID.Text) + 'AND UserPassword=' + Quotedstr(edtUserPwd.Text);

  if SQLSearch(SQL,DM.ADOConn) = False then

  begin

    Application.MessageBox('登录信息错误,请重新登录!','错误',16);

    edtUserPwd.Text :='';

    edtUserID.SetFocus;

    Exit;

  End.

加了颜色都是小菜鸟不懂的地方