如何使用 AdsCopyTableStructure 创建 ttAdsCDX 表

Question

使用 Advantage Server 9x，我尝试使用以下代码创建 DBF/CDX 表结构的副本：

table1.AdsCopyTableStructure(d.AdsConnectionTemp.connectPath+'table.dbf');

创建的表的类型为 ttAdsADT，即使原始表是 ttAdsCDX。

我尝试在结果表上使用 AdsConvertTable，但它弹出一个异常，抱怨该操作无法在空闲表上完成。

有办法做到这一点吗？

Answer 1

我无法让这个函数工作，但通过使用以下代码想出了一个解决方法：

 t:=TAdsTable.create(nil);
 try
      t.AdsTableOptions.AdsFilterOptions:=RESPECT_WHEN_COUNTING;
      t.open;
      t.AdsSetAOF('keyval=-1'); // gives an empty result
      t.AdsCopyTable('c:\somewhere\emlt.dat');
      t.close;
 finally
      freeAndNil(t);
 end;

Answer 2

你有几个选择。
如果您不介意有一条记录，您可以随时执行

Select top 1 * into mynewtable.dbf from oldtable ，

这很快

第二个选项是执行第一种方法，将其保存到 adt 文件（这是默认值）然后打开该表并使用 ADSConvertTable 函数创建 DBF。

ADTTable.ADSTableConvert('dbftable.dbf',ttADSCDX);

Answer 3

QDSPRINTLIG.AdsConvertTable(gcTmpDir + gcTempFile + '.dbf',ttADSCDX);

13 年后它仍然有效:))