怎样用TTable创建带关键字的数据库？ (50分)

[red][8D]怎样用TTable创建带关键字的数据库？ [/red]

怎么没有人回答啊？？？

TTable,可以创建数据库吗？用 AdoCommand 吧

怎么会不可以呢？
Table:=TTable.Create(Self);
with Table do begin
DatabaseName:=ExtractFilePath(Application.ExeName);
TableName :='Declk.db';
TableType :=ttDefault;
with FieldDefs do begin
add('Id',ftString,StrToInt(TcDeh.text),false);
add('Name',ftString,StrToInt(TCldm.text),false);
add('sl',ftFloat,0,false);
end;
CreateTable;
Active :=True;
但是我要将id设置为关键字段,该怎么办？

用query写sql语句不是更方便吗。