Проблема с динамическим добавлением полей

← →
molodoi (2008-04-08 15:51) [0]

Мне нужно при выборе в ComboBox`е открывать таблицу и добавлять поле.
...
Reestr.Close;
Reestr.FieldDefs.Update;
for i := 0 to Reestr.FieldDefs.Count - 1 do
begin
Field := Reestr.FieldDefs[I].CreateField(Reestr);
end;
Field := TStringField.Create(Reestr);
Field.FieldName := "COST";
Field.Calculated := True;
Field.DataSet := Reestr;
Reestr.Open;
...
В первый раз срабатывает нормально. Во второй вылетает с ошибкой про дублирование полей.
Пробовал втыкать Reetrs.FieldDefs.Clear;- не помогает. Ваши рекомендации.

← →
Kolan © (2008-04-08 15:56) [1]

> Ваши рекомендации.

Имя должно быть уникальным?

← →
Reindeer Moss Eater © (2008-04-08 15:57) [2]

Проверять перед созданием поля существование этого поля.

← →
Reindeer Moss Eater © (2008-04-08 15:58) [3]

Пробовал втыкать Reetrs.FieldDefs.Clear;- не помогает.

И не поможет, потому что у тебя дублирование полей, а не FieldDef"ов

← →
molodoi (2008-04-08 17:10) [4]

По логике FieldDefs.Clear должен чистить этот самый FieldDefs и дублирование не должно происходить.

← →
molodoi (2008-04-08 17:28) [5]

Помогло Reestr.Fields.Clear;

По логике FieldDefs.Clear должен чистить этот самый FieldDefs и дублирование не должно происходить.

Это только по твоей логике.

Проблема с динамическим добавлением полей Найти похожие ветки