Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как добавить новое поле в уже сужествующую таблицу? [D5, Paradox]

grusty © (2002-10-17 15:35:00)
Уважаемые, подскажите!
Как добавить новое поле в уже сужествующую таблицу?
Заранее благодарен!

Max Zyuzin (2002-10-18 16:24:00) [1]
>sniknik © (18.10.02 16:21)
Упс. Извиняюсь, невнимательно прочитал... :( пятница - голова ужо пухнет

John13 (2002-10-18 16:24:00) [2]
Max Zyuzin © (18.10.02 16:17)
>John13 (18.10.02 16:09)
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1034916924&n=1
Дык там описаны средства ISQL, а мне-то надо программно...

sniknik (2002-10-18 16:21:00) [3]
Max Zyuzin © не вводите в заблуждение Paradox и IB6 <-! :(.

sniknik (2002-10-18 16:19:00) [4]
в тексте дельфей пишеш DbiDoRestructure, становишся на запись курсором и нажимаеш Ctrl+F1 (есть пример). Большего чем там никто не скажет.

Max Zyuzin (2002-10-18 16:17:00) [5]
>John13 (18.10.02 16:09)
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1034916924&n=1

John13 (2002-10-18 16:09:00) [6]
Кстати, меня интересует тот же вопрос, а на нервы не жалуюсь - КАК через dbi?

sniknik (2002-10-17 17:24:00) [7]
см. Johnmen © (17.10.02 16:26)
можно еще через функции dbi вроде DbiDoRestructure но это путь не для слабонервных. :))

grusty (2002-10-17 17:15:00) [8]
With FieldDefs do
Begin
Clear;
Add("FIO",ftString,30,False);
.....
Add("FIO_124",ftString,70,False);
End;
-----------
Это работает перед созданием таблицы (CreateTable), а меня интересует после её создания (программно). Смысл в том, что мне необходимо проверить базу (FindField) на наличие некоторого поля и при его отсутствии добавить его не очищая таблицу.

Vovchik_A (2002-10-17 16:48:00) [9]
пардон, в предпоследней строке кавычки забыл
Add("FIO_124",ftString,70,False);

Vovchik_A (2002-10-17 16:46:00) [10]
В смысле программно ?

После того как создана тблица
-----
With FieldDefs do Begin Clear; Add("FIO",ftString,30,False); ..... Add(FIO_124,ftString,70,False); End;

Johnmen (2002-10-17 16:26:00) [11]
вар.1. При помощи Database Desktop
вар.2. ALTER TABLE <TableName> ADD <FieldName> <FieldSpec>

Наверх

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