动态创建数据表的问题(100分)

  • 主题发起人 主题发起人 Delphi刘
  • 开始时间 开始时间
D

Delphi刘

Unregistered / Unconfirmed
GUEST, unregistred user!
我编的一段动态创建数据表的程序

var
TblNew:TTable;
IndexOptions:TIndexOptinos;
TableFound:Boolean;
Begin
TblNew:=Table.Create;
IndexOptions:=[ixPrimary,ixUnique];
with TblNew do
begin
Active:=True;
DataBaseName:='NyJyData';
TableName:=Edit1.Text;
TableType:=ttDefault;
FieldDefs.clear;
FieldDefs.add(Edit2.Text,ftInteger,0,False);
FieldDefs.add(Edit3.Text,FtString,0,False);
end;
TableFound:=FindTable(Edit1.Text);
if TableFound=True then
if MessageDlg(Edit1.Text+'already Exist,Overwrite?',mtConfirmation,
mbYesNo,0)=mrYes then
TableFound:=False;
end;
else
CreateTable;
end;

为什么编译通不过呢?
提示错误:
Undeclared indentifier:TTable;
Undeclared indentifier:TIndexOption;
 
在uses里加上DB和DBTables单元
 
正如楼上所说,当提示这样的错误时
Undeclared indentifier:xxxxxx;
要么是变量没有定义,要么是相关的单元没有被引用。
 
对,uses dbtables
 
哎,来晚了
 
没赚到分。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部