S
soj
Unregistered / Unconfirmed
GUEST, unregistred user!
var
T: TIntegerField;
begin
Table1.Close;
T := TIntegerField.Create(Self);
T.FieldName := 'Quantity';
T.FieldKind := fkCalculated;
T.Name := Table1.Name + T.FieldName;
T.DataSet := Table1;
Table1.Open;
end;
我是这样创建TIntegerField,但是dbgrid里只能显示我加入的这个字段,table1.fieldcount
=1,而如果不创建的话就可以正常,我想在原有的字段中加入一个或多个计算字段而不破坏原有的结构
(我不想在field editor里加入固定的字段,虽然这样可以,但是根本没有这个必要)
请各位高手指教!
T: TIntegerField;
begin
Table1.Close;
T := TIntegerField.Create(Self);
T.FieldName := 'Quantity';
T.FieldKind := fkCalculated;
T.Name := Table1.Name + T.FieldName;
T.DataSet := Table1;
Table1.Open;
end;
我是这样创建TIntegerField,但是dbgrid里只能显示我加入的这个字段,table1.fieldcount
=1,而如果不创建的话就可以正常,我想在原有的字段中加入一个或多个计算字段而不破坏原有的结构
(我不想在field editor里加入固定的字段,虽然这样可以,但是根本没有这个必要)
请各位高手指教!