用程序动态改变TTable控件字段的问题

Question

我的Table1里面已经存在 Name,Age,Score 三个字段.然后Table1.Fields.Clear;   //清空所有字段然后我想用程序又在Table1里又添加上 Name 字段,
我用  Table1.Fields.Add('Name');      帮助文件说Table1.Fields.Add(AField);//AField 应该是一个 TField 类型而不是字符串!实际上我怎么写都报错，是什么地方错了？正确的写法该用什么？

Answer 1

table2.Close;
table2.Active:=false;
table2.Exclusive:=true;
table2.TableName:='h:\gzkd\sds';
table2.TableType:=ttFOXPRO;
  with table2.FieldDefs do
  begin
  clear;
  with addfielddef do
  begin
  name:='bh';
  datatype:=FTSTRING;
  size:=6;
    end;