H
hgzy
Unregistered / Unconfirmed
GUEST, unregistred user!
我在用程序建库时,遇到一些麻烦.请大家帮帮忙!
>>if not temp.exists then
begin
with tempdo
begin
active:=false;
databasename:='zy-ad';
tabletype:=ttDefault;
tablename:='temp';
with fielddefsdo
begin
clear;
Add('field1',ftInteger,0,true);
Add('Field2', ftString, 30, False);
end;
createtable;
>> end;
以上程序错在那里?请指出.(举例也行)
>>if not temp.exists then
begin
with tempdo
begin
active:=false;
databasename:='zy-ad';
tabletype:=ttDefault;
tablename:='temp';
with fielddefsdo
begin
clear;
Add('field1',ftInteger,0,true);
Add('Field2', ftString, 30, False);
end;
createtable;
>> end;
以上程序错在那里?请指出.(举例也行)