一个关于SQL语句的问题

Question

FrmLogin.ADOQuery.SQL.Add('select * from Priority where username='+UserNameEdit.Text+' AND kinds='+UserKindBox.Text);
     try
       FrmLogin.ADOQuery.Open;
     except
       Showmessage('数据库打开失败!');
     end请问哪里有错误
怎么改??

Answer 1

FrmLogin.ADOQuery.SQL.Add('select * from Priority where username='''+UserNameEdit.Text+''' AND kinds='''+UserKindBox.Text+'''');
     try
       FrmLogin.ADOQuery.Open;
     except
       Showmessage('数据库打开失败!');
     end

Answer 2

var
  sqlstr:string;  sqlstr:='select * from Priority where username='''+UserNameEdit.Text+''' AND kinds='''+UserKindBox.Text+'''';FrmLogin.ADOQuery.SQL.Add(sqlstr);