Delphi - query con like

Saben como puedo hacer para que mi usar en mi query un like ? ademas necesito que la variable del like sea dinamica, ya que la comparacion depende de un combobox,denme un ejemplo x fa

Algo así:

With Query1 do
begin
close;
sql.clear;
sql.add('select * from la_tabla where el_campo like '''' + '%' + combobox.text + '%''';
open;
end;

La cantidad de comillas simples no estoy seguro si esta bien.