请问在delphi4.0中如何在程序运行时建立和删除虚拟字段?(Table)(100分)

  • 主题发起人 主题发起人 Hoy
  • 开始时间 开始时间
什么叫虚拟字段?是基于内存的表吗?还是计算字段?
 
就是,不明白。
 
faint.
怎么又来一遍?
 
var
tt:TIntegerField;

procedure TForm1.Button1Click(Sender: TObject);
begin
tt:=TIntegerField.Create(self);
tt.FieldName := 'Test1' ;
tt.FieldKind:=fkCalculated;
tt.DataSet:=table1;
table1.active:=true;
end

procedure TForm1.Button2Click(Sender: TObject);
begin
table1.active:=false;
table1.fields.remove(tt);
table1.open;
end
 
操作失误?送分?
 
不是呀,明明后面有个TABLE,是虚拟TABLE?虚拟FIELD?
 
接受答案了.
 
后退
顶部