T
teleman
Unregistered / Unconfirmed
GUEST, unregistred user!
with tableyhk do
begin
active:=false;
databasename:='gdk';
tablename:='yhkk'+inttostr(orderyhk);
tabletype:=ttdbase;
with fielddefs do
begin
add('department',ftstring,10,false);
add('name',ftstring,10,false);
add('phonecode',ftstring,8,true);
add('office',ftstring,8,true);
add('applydate',ftdate,0,true);
add('inputdate',ftdate,0,true);
end;
with indexdefs do
begin
clear;
add('primary','department + name',[ixExpression]);
end;
CreateTable
这样,程序运行有错误。‘INVALID INDEX DESCRIPT。TABLE NOT EXIST。。。。。。
但是,将索引定义改为
add('primary','department',[ixPrimary]),
程序运行就不出错了。
How can I do.
thank u.
begin
active:=false;
databasename:='gdk';
tablename:='yhkk'+inttostr(orderyhk);
tabletype:=ttdbase;
with fielddefs do
begin
add('department',ftstring,10,false);
add('name',ftstring,10,false);
add('phonecode',ftstring,8,true);
add('office',ftstring,8,true);
add('applydate',ftdate,0,true);
add('inputdate',ftdate,0,true);
end;
with indexdefs do
begin
clear;
add('primary','department + name',[ixExpression]);
end;
CreateTable
这样,程序运行有错误。‘INVALID INDEX DESCRIPT。TABLE NOT EXIST。。。。。。
但是,将索引定义改为
add('primary','department',[ixPrimary]),
程序运行就不出错了。
How can I do.
thank u.