consulta con like

[ramphi]

bueno ahora me da otro error

despues de corregir lo de los % me seguia dando error de syntaxis y vi que ne el mensaje de error me ponia unas comillas de mas entonces retire el quotedstr() y el mensaje siguiente es

falta operador en 'NOMBRES like *Maria*' en la expresion
SELECT * FROM TESIS WHERE NOMBRES LIKE *MARIA*

que me faltaria por mas que he intentado no le encuentro nada

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
VAR consulta: string;
begin consulta:= 'SELECt * FROM tesis WHERE ' + combobox1.text+' LIKE '+ '*'+edit1.Text+'*';
datamodule2.ADOQuery1.Close;
datamodule2.ADOQuery1.SQL.Add(consulta);
datamodule2.ADOQuery1.Open;
end;