修改:Cmd.CommandText := 'Insert into 新评价指标 (序号,指标科目,年份,实际比率) Values(' + inttostr(i) + ',' + quotedstr(FieldName[i]) + ',' + quotedstr(Combobox1.Text) + ',' + quotedstr(CValue)+')';

解决方案 »

  1.   

    直接ShowMessage(cmd.CommandText);看看!
      

  2.   

    直接ShowMessage(cmd.CommandText);看看!
      

  3.   

    直接ShowMessage(cmd.CommandText);看看!
      

  4.   

    Cmd.CommandText := 'Insert into 新评价指标 (序号,指标科目,年份,实际比率) Values(' + inttostr(i) + ','#39 + FieldName[i] +#39+ ','#39 + Combobox1.Text +#39 +','#39 + CValue+#39+')'
      

  5.   

    Cmd.CommandText := 'Insert into 新评价指标 (序号,指标科目,年份,实际比率) Values(' + inttostr(i) + ','+'''' + FieldName[i] ''''+ ','+'''' + Combobox1.Text + ''''+','+'''' + CValue+''''+')';是values里面字符应该加引号
      

  6.   

    uninstall first,then install again.