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

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

проблема с добавлением поля в таблицу [D5, dBase, FoxPro, Paradox]

Владимир Ткачук ©   (2003-04-16 16:21:00) 

Вопрос звучит так: можна ли в таблицу (TTable) добавить поле уже после того как она создана (createTable)?
Я пробовал что-то вроде Table.FieldDefs.Add(...) - ошибку не выдало, но и поле не добавило.

Спасибо всем, кто ответит

---

Y   (2003-04-16 16:38:00) [1]

SQL:
alter table Tab add Field1 ... ?

---

Соловьев   (2003-04-16 16:29:00) [2]

Вот я делал. У меня добавляло.

MySql := TQuery.Create(FormEye);
with MySql do
begin
DataBaseName := "eyes";
AutoCalcFields := true;
OnCalcFields := MyCalcFields;
with FieldDefs do
begin
Add("PHONE", ftFloat, 0, true);
FieldDefs[0].CreateField(MySql);

Add("FIO", ftString, 200, true);
FieldDefs[1].CreateField(MySql);

Add("N_SPRAV", ftString, 100, true);
FieldDefs[2].CreateField(MySql);

Add("VYDAN", ftString, 200, true);
FieldDefs[3].CreateField(MySql);

Add("SROK", ftString, 100, true);
FieldDefs[4].CreateField(MySql);

Add("DATA", ftDate, 0, true);
FieldDefs[5].CreateField(MySql);

Numer := TIntegerField.Create(MySql);
with Numer do
begin
FieldName := "Numer";
Calculated := True;
DataSet := MySql;
Name := MySql.Name + FieldName;
MySql.FieldDefs.Add(Name, ftInteger, 0, true);
end;
end;
end;


---

Max Zyuzin   (2003-04-16 16:28:00) [3]

>Владимир Ткачук (16.04.03 16:21)
Правильнее изменять структуру таблице в DataBase Desktop -е там все наглядно и работает наверняка

---

Наверх