实现模糊查询时出错，提示无效字符

Question

delphi代码如下：
　procedure TForm1.Edit1Change(Sender: TObject);
begin
 ADOQuery1.SQL.Text:='SELECT * FROM tstuinfo WHERE xuehao like '+QuotedStr(Edit1.Text)+'%';
 ADOQuery1.Open;
 if ADOQuery1.IsEmpty then
  begin
    ShowMessage('没有找到');
    Exit;
  end;
  ListBox1.Clear;
  while not ADOQuery1.Eof do
  begin
    ListBox1.Items.Add(ADOQuery1.FieldByName('xuehao').AsString);
    ADOQuery1.Next;
  end;
end;

Answer 1

ADOQuery1.SQL.Text:='SELECT * FROM tstuinfo WHERE xuehao like '+QuotedStr(Edit1.Text+'%');

Answer 2

ADOQuery1.SQL.Text:='SELECT * FROM tstuinfo WHERE xuehao like '''+Edit1.Text+'%''');

Answer 3

谢谢网虫，问题解决了，是我那个字段是数字类型，所以会提示错误，不过想问下如果是数字类型的话，那句adoquery1.sql.text要怎么写呢