SQL Parse Error: EOF in string detected

Ola amigos, estou com um grande problema em delphi.

Estou Desenvolvendo uma Aplicação em Delphi 7 com o banco de dados em Interbase.

E esta ocorrendo um erro na hora de fazer uma pesquisa no banco de dados "SQL Parse Error: EOF in string detected"

no botão pesquisa eu coloquei os seguinte comandos:

dm.Query_Pesq.Close;

dm.Query_Pesq.SQL.Clear;

dm.Query_Pesq.SQL.Add('select * from peca where(veiculo)like (''%'+quotedstr (ED_veiculo.Text+'%')+')');

dm.Query_Pesq.Prepare;

dm.Query_Pesq.Open;

a aplicação compila e roda normal, mais quando eu vou pesquisar aparece esse erro.

alguem pode me ajudar? http://forum.imasters.com.br/public/style_emoticons/default/natal_happy.gif

Agradeço