Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Программно добавить поле в TFields


Вика ©   (2001-12-18 10:29:00) 

Есть Sql-предложение с переменным числом полей. Всё бы хорошо, да в этом датасете есть ещё lookup-поле. Как мне добавлять/удалять поля , по мере необходимости?

fld:=TField.Create(Application);
fld.FieldName := "Vidname";
fld.FieldKind := fkData;
fld.SetFieldType(ftstring);
qu.Fields.Add(fld);

При работе этого текста - выдаётся ошибка, что тип поля ftUnknown, а реально ftString. Т.е. полдучается, что присоздании поля ему присваивается тип ftUnknown, и потом строкой fld.SetFieldType(ftstring); - уже ничего не меняется.

Подскажите пожалуйста - где я ошибаюсь.


Delirium   (2001-12-18 11:25:00) [1]


var fld:TStringField;


Наверх

Титульная страница Поиск, карта сайта Написать письмо