在Delphi中写SQL语句，遇到匹配问题

Question

我的代码如下：
qyUsersBase.SQL.Text := 'select LineNo, phone,email,address ' +
                        ' FROM  a' +
                        ' WHERE Name1 like %:username% ' +
                        ' ORDER BY LineNo';
qyUsersBase.Parameters.ParamByName('username').Value  := Edit2.Text ; //报错Parameters ‘username’is not found.          匹配应该怎么写呢？

Answer 1

qyUsersBase.SQL.Text := 'select LineNo, phone,email,address ' +
  ' FROM a' +
  ' WHERE Name1 like :username ' +
  ' ORDER BY LineNo';
qyUsersBase.Parameters.ParamByName('username').Value := '&'+Edit2.Text+'&' ;

Answer 2

是 Value := '%'+Edit2.Text+'%' 

Answer 3

qyUsersBase.SQL.Text := 'select LineNo, phone,email,address ' +
  ' FROM a' +
  ' WHERE Name1 like ''%username%''' +
  ' ORDER BY LineNo';