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

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

Как в таблицу(заполнененую) добавить новое поле [D6, Paradox]


savc ©   (2002-06-01 12:22:00) 

Помогите, я сделал таблицу и заполнинил ее мне необходимо, чтобы в ходе работы программы можно было добавить новое поле не удаляя данных из существующей таблицы


Ник   (2002-06-01 19:56:00) [1]

1. Через SQL-запрос ALTER TABLE. Но придется пользоваться TQuery.
2. Через bde функцию dbiDoRestructure - описание в bde32.hlp
3. Компонента от Degisy SoftWare http://www.dbwork.kuban.ru

1й способ самый простой


sizmrebi   (2002-06-01 16:26:00) [2]

-> shrek
eto pri sozdanii novogo Table.


Shrek   (2002-06-01 13:01:00) [3]

Попробуй ка вот это.

with Table1 do begin
Active := False;
DatabaseName := "YouAlias";
TableType := ttParadox;
TableName := "YouTable";


if not Table1.Exists then begin

with FieldDefs do begin
with AddFieldDef do begin
Name := "NewField";
DataType := ftInteger;
end;

end;

with IndexDefs do begin

with AddIndexDef do begin
Name := "PyNewField";
Fields := "NewField";
end;
end;

CreateTable;
end;
end;


Anatoly Podgoretsky   (2002-06-01 13:00:00) [4]

Почему именно из программы


Наверх

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