Текущий архив: 2003.05.05;
Скачать: CL | DM;
Вниз
проблема с добавлением поля в таблицу Найти похожие ветки
← →
Владимир Ткачук (2003-04-16 16:21) [0]Вопрос звучит так: можна ли в таблицу (TTable) добавить поле уже после того как она создана (createTable)?
Я пробовал что-то вроде Table.FieldDefs.Add(...) - ошибку не выдало, но и поле не добавило.
Спасибо всем, кто ответит
← →
Max Zyuzin © (2003-04-16 16:28) [1]>Владимир Ткачук (16.04.03 16:21)
Правильнее изменять структуру таблице в DataBase Desktop -е там все наглядно и работает наверняка
← →
Соловьев © (2003-04-16 16:29) [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;
← →
Y (2003-04-16 16:38) [3]SQL:
alter table Tab add Field1 ... ?
Страницы: 1 вся ветка
Текущий архив: 2003.05.05;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.015 c
