如何将查询出来的数据保存成'.dbf'格式的文件？

Question

如题，找了半天也没找到Delphi的例子，向大家求助！

Answer 1

To： unsigned（僵哥）
  我试着写了下，但是为什么生成dbf文件的表头是英文就没问题，中文就是乱码而且有时还报错呢？
我是这么写的  try
    with Fdm.Table1 do
      begin
        Active:=False;
        TableName:='a.dbf';
        TableType:=ttFoxPro;
        FieldDefs.Add('第一列',ftstring,30);//FieldDefs.Add('A',ftString,30);//这里写成应为就没问题，中文就是乱码       
        FieldDefs.Add('第二列',ftstring,30);//FieldDefs.Add('B',ftString,30);
        FieldDefs.Add('第三列',ftstring,30);//FieldDefs.Add('C',ftstring,30);
        CreateTable;
      end;
  except
    MessageDlg('出现异常,无法创建dbf文件!',mtInformation,[mbOk],0);
  end;