帮忙看看出了什么问题，（update语句的语法错误）

Question

DataModule1.BaseADOQuery.Close;
   //DataModule1.BaseADOQuery.Active:=false;
   DataModule1.BaseADOQuery.SQL.Clear ;   //修改记录到AO_Appinfo
   DataModule1.BaseADOQuery.SQL.Add('update AO_AppInfo set (AppName=:Appname,AppCorp=:AppCorp,AppAuthor=:AppAuthor,AppVer=:AppVer,AppDllName=:AppDllName,AppMemo=:AppMemo) where Appid=:Appid');   //DataModule1.BaseADOQuery.SQL.Add('Values (:AppID,:AppName,:AppIndex,:AppCorp,:AppAuthor,:AppVer,:AppDllName,:AppType,:AppMemo)');   //参数的值
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppID').Value:= LabeledEdit_AppId.Text;     //
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppName').Value:= LabeledEdit_AppName.Text;
   //DataModule1.BaseADOQuery.Parameters.ParamByName('AppIndex').Value:= currIndex;                  //
   //DataModule1.BaseADOQuery.Parameters.ParamByName('AppMenu').Value:=  s;
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppCorp').Value:= LabeledEdit_AppGrop.Text;
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppAuthor').Value:= LabeledEdit_AppAuthor.Text;
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppVer').Value:= LabeledEdit_AppVer.Text;
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppDllName').Value:= LabeledEdit_AppDllname.Text;
   //DataModule1.BaseADOQuery.Parameters.ParamByName('AppType').Value:=  1;
   DataModule1.BaseADOQuery.Parameters.ParamByName('AppMemo').Value:=  LabeledEdit_AppMemo.Text;
   DataModule1.BaseADOQuery.execsql;

Answer 1

DataModule1.BaseADOQuery.Parameters.ParamByName('AppName').Value:= QuoteStr(LabeledEdit_AppName.Text);
将字符性的字段加引号；

Answer 2

在SQLSERVER里，UPDATE语句，不允许有括号，用逗号间隔就可以。
   DataModule1.BaseADOQuery.SQL.Add('update AO_AppInfo set AppName=:Appname,AppCorp=:AppCorp,AppAuthor=:AppAuthor,AppVer=:AppVer,AppDllName=:AppDllName,AppMemo=:AppMemo where Appid=:Appid');