Fórum Update no ClientDataSet.CommandText #331178

Olá estou com um problema na construção do comando.

Acho q esta na formatação das aspas.

Alguem pode me dar uma ajuda?

DMClient.cdsEmpresas_Prod_Serv.CommandText:=´´;
DMClient.cdsEmpresas_Prod_Serv.Close;
DMClient.cdsEmpresas_Prod_Serv.CommandText:=
´update EMPRESAS_PRODUTOS_SERVICOS set QUANT_MES = ´+StrToFloat(DBEdit9.Text)+
´ where CODIGO_EMPRESA =´+Label10.Caption+
´ and CODIGO_PROD_SERV =´+Label11.Caption;
DMClient.cdsEmpresas_Prod_Serv.Params.parambyname(´pCodEmpresa´).asstring:= Label10.Caption;
DMClient.cdsEmpresas_Prod_Serv.Params.parambyname(´pCodProduto´).asstring:= Label11.Caption;
DMClient.cdsEmpresas_Prod_Serv.execute;

DMClient.cdsEmpresas_Prod_Serv.CommandText:=´´;
DMClient.cdsEmpresas_Prod_Serv.Close;
DMClient.cdsEmpresas_Prod_Serv.CommandText:=´select * From EMPRESAS_PRODUTOS_SERVICOS´;
DMClient.cdsEmpresas_Prod_Serv.Open;