首页  编辑  

建立含自动增加的字段的表

Tags: /超级猛料/Database.数据库相关/Paradox & dBase/   Date Created:

Table.CreateTable 不支持自动增加的字段,可以使用TQuery和SQL Create Table来做!参考下面的代码:

with Query1 do

 begin

   DatabaseName := 'DBDemos';

   with SQL do

   begin

     Clear;

     Add('CREATE TABLE "PDoxTbl.db" (ID AUTOINC,');

     Add('Name CHAR(255),');

     Add('PRIMARY KEY(ID))');

     ExecSQL;

     Clear;

     Add('CREATE INDEX ByName ON "PDoxTbl.db" (Name)');

     ExecSQL;

   end;

 end;