Скачать: CL | DM;

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 на это создавать нехочется. Можно ли создавать поле когда понадобится, а потом удалять его?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c