求解释代码
求解释这段代码：procedure TfrmLogin.btnLoginClick(Sender: TObject);varSQL :string;beginSQL :='SELECT * FROM WHERE UserID=' +Quotedstr(edtUserID.Text) + 'AND UserPassword=' + Quotedstr(edtUserPwd.Text);if SQLSearch(SQL,DM.ADOConn) = False thenbegin Application.MessageBox('登录信息错误,请重新登录!','错误',16); edtUserPwd.Text :=''; edtUserID.SetFocus; Exit;End.加了颜色都是小菜鸟不懂的地方
页:
[1]