F fu_xiang_yu Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-06 #3 Alter Table TableName Add column ColumnName
F fu_xiang_yu Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-06 #4 如果是其它类型的字段 1、添加计算字段： var a:tintegerfield; begin table1.close; a:=tstringfield.create(application); a.FieldKind:=fkCalculated; a.FieldName:='Calc'; a.DataSet:=table1; table1.Open; end; 做完如上代码后，就在表中添加了一个计算字段，当然，你还得在OncalcFields 中进行具体的计算。 2、添加LOOKUP字段也像上面，只不过是FieldKing类型改成fkLoopUp就是行，但还得设一下它的LookupDataset,Lookupkeyfields等东东
如果是其它类型的字段 1、添加计算字段： var a:tintegerfield; begin table1.close; a:=tstringfield.create(application); a.FieldKind:=fkCalculated; a.FieldName:='Calc'; a.DataSet:=table1; table1.Open; end; 做完如上代码后，就在表中添加了一个计算字段，当然，你还得在OncalcFields 中进行具体的计算。 2、添加LOOKUP字段也像上面，只不过是FieldKing类型改成fkLoopUp就是行，但还得设一下它的LookupDataset,Lookupkeyfields等东东
M meatbird Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-06 #5 fu_xiang_yu，谢谢你，但是还有一个小问题就是我添加后，原来的字段就看不见了。 怎么办？
T txfzr Unregistered / Unconfirmed GUEST, unregistred user! 2001-06-08 #6 with ADataSet.FieldDefs do begin Add(′Name′,ftString,30,False); Add(′Value′,ftInteger,0,False); end;
