注意在字符串中想使用单引号需要两个单引号。
已经引号之间不能有空格。
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from titles ' );
adoquery1.sql.add('where title like ''%'+edit1.text+'%''' );
adoquery1.open;
end;