X
xdoudou
Unregistered / Unconfirmed
GUEST, unregistred user!
动态建临时表,
table1.close;
table1.DatabaseName:='c:/secdb';
table1.TableName:='temp.db';
table1.TableType:=ttParadox;
with table1.FieldDefs do
begin
clear;
add('id',ftString,12,True);
add('contents',ftString,100,false);
end;
table1.IndexDefs.clear;
table1.IndexDefs.Add('idindex','id',[ixPrimary,ixUnique]);
table1.CreateTable;//到这里时说tableis busy,为什么?
我以前在一个小程序里也是这样用的,怎么就可以了呢?
table1.close;
table1.DatabaseName:='c:/secdb';
table1.TableName:='temp.db';
table1.TableType:=ttParadox;
with table1.FieldDefs do
begin
clear;
add('id',ftString,12,True);
add('contents',ftString,100,false);
end;
table1.IndexDefs.clear;
table1.IndexDefs.Add('idindex','id',[ixPrimary,ixUnique]);
table1.CreateTable;//到这里时说tableis busy,为什么?
我以前在一个小程序里也是这样用的,怎么就可以了呢?