Delphi里的索引mdx,cdx

因为某种原因，在用BDE操作foxpro数据表时

  tblTj.DatabaseName:=DataPath;
  tblTj.TableName:=tj;
  try
      tblTj.AddIndex('dahindex','id',[]);
      tblTj.IndexFieldNames:='id';
  except
  end; 

创建的索引文件为MDX格式，当进行tblTj.EmptyTable时，会出现错误

解决方法，在

tblTj.DatabaseName:=DataPath;

 tblTj.TableName:=tj;

后加上

tblTj.TableType:=ttFoxPro;