Kak в TQuery програмно добавить поле (вычислимое)?

← →
Stupid (2004-06-18 13:36) [0]

Kak в TQuery програмно добавить поле (вычислимое)?

Пытаюсь так
Var
SKonNosFld:TStringField;
Begin
AM.TmQuery.Close;
SKonNosFld:=TStringField.Create(AM.TmQuery);
SKonNosFld.Name:="SKonNos";
SKonNosFld.DataSet:=AM.TmQuery;
End;

говорит : Field name is missing.

Что ещё надо? или как будет правильнее?

← →
Johnmen © (2004-06-18 13:43) [1]

Примерно так:
with TStringField.Create(TmQuery) do begin FieldName := "MyCalcField"; FieldKind:= fkCalculated; DataSet := TmQuery; Name := Dataset.Name + FieldName; TmQuery.FieldDefs.Add(Name, ftString, 20, false); end;

← →
Stupid (2004-06-18 17:42) [2]

Если я добавляю поле, то после открытия запроса нет доступа к остальным полям по FieldByName.

У меня есть TQuery, поля не определены.
Использую его в разных местах программы для разных запросов.
В одной из форм понадобилось вычислимое поле. Отдельный TQuery на это создавать нехочется. Можно ли создавать поле когда понадобится, а потом удалять его?

Kak в TQuery програмно добавить поле (вычислимое)? Найти похожие ветки