pesquisa

estou fazendo uma consulta no firebird meu codigo éesse

DataModule1.SDSCliente.Close;
 sql := DataModule1.sdsCliente.CommandText;
 DataModule1.sdsCliente.CommandText := 'select * from CLIENTE where upper(Nomecliente) like upper('+QuotedStr(edit1.text+'%')+') ';
 DataModule1.SDSCliente.Open;

so q ta dando esse erro q nao sei o q é "project controle.exe raised exception class EDatabaseError with message 'token unknown - line 1, column 16 select'.

alguem sabe me informa q erro é esse?

obrigado