急问用table1.batchMove(Asource:TBDEDateSet;AMode:TBatchMode):longint移动数据时提示destination must be indexed.table.我建索引后还

Question

在table1里面指定indexName属性看看。

Answer 1

procedure tfmain.upfee;
begin
  if dm.Tfee_month.RecordCount=0 then
    exit;
  dm.Tfee_month.First;
  while not dm.Tfee_month.Eof  do
    begin
      dm.Tfee.Append;
      dm.Tfee.Fields[1].Value:=dm.Tfee_month.Fields[1].Value;
      dm.Tfee.Fields[2].Value:=dm.Tfee_month.Fields[2].Value;
      dm.Tfee.Fields[3].Value:=dm.Tfee_month.Fields[3].Value;
      dm.Tfee.Fields[4].Value:=dm.Tfee_month.Fields[4].Value;
      dm.Tfee.Fields[5].Value:=dm.Tfee_month.Fields[5].Value;
      dm.Tfee.Fields[6].Value:=dm.Tfee_month.Fields[6].Value;
      dm.Tfee.Fields[7].Value:=dm.Tfee_month.Fields[7].Value;
      dm.Tfee.Fields[8].Value:=dm.Tfee_month.Fields[8].Value;
      dm.Tfee.Fields[9].Value:=dm.Tfee_month.Fields[9].Value;
      dm.Tfee.Fields[10].Value:=dm.Tfee_month.Fields[10].Value;
      dm.Tfee.Fields[11].Value:=dm.Tfee_month.Fields[11].Value;
      dm.Tfee.Fields[12].Value:=dm.Tfee_month.Fields[12].Value;
      dm.Tfee.Fields[13].Value:=dm.Tfee_month.Fields[13].Value;
      dm.Tfee.Fields[14].Value:=dm.Tfee_month.Fields[14].Value;
      dm.Tfee.Fields[15].Value:=dm.Tfee_month.Fields[15].Value;
      dm.Tfee.Fields[16].Value:=dm.Tfee_month.Fields[16].Value;
      dm.Tfee.Fields[17].Value:=dm.Tfee_month.Fields[17].Value;
      dm.Tfee.Post;
      dm.Tfee_month.Delete;
    end;
end;