请问：如何根据DBGRID中的数据生成ACCESS表或DBF表？

Question

我在程序中是用ADO组件。现在想实现功能：根据DBGRID中的数据来动态生成ACCESS表或DBF表，表名、保存的路径都由用户指定。
请高手赐教！

Answer 1

先建立数据库文件
var
  CreateAccess:OleVariant;
  s: string;
begin
  if SaveDialog1.Execute then
  begin
    CreateAccess:=CreateOleObject('ADOX.Catalog');
    CreateAccess.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+SaveDialog1.FileName);
  end
  else
    exit;
end;如果知道每一个字段的类型就好！通过sql语名创建表。'create tabel tablename(...);

Answer 2

ACCESS中每个字段的类型要同DBGRID中每一列的类型相同。