Удаление/добавление полей runtime

[/Denis/]

Есть таблица Paradox. Нужно добавить поле во время работы программы таким образом, чтобы оно осталось и после работы программы. Кроме того, нужно чтобы вся информация в таблице сохранилась. Калькулируемые поля не предлагать. После этого нужно еще и удалить одно из полей таблицы, тоже runtime. Надеюсь на помощь

[Pitbull]

Вот тебе пример, как создаются поля... Тут прикол, что при создании полей, вся структура пересоздается...
попробуй... может,єто именно то, что тебе нужно

   with Table1 do
       begin

         TableName := 'data_cb';
         if not Table1.Exists then begin

    with FieldDefs do begin
     Clear;
     with AddFieldDef do begin
       Name := 'Field1';
       DataType := ftinteger;
       Required := True;
     end;
     with AddFieldDef do begin

       Name := 'Field7';
       DataType := ftString;
       Size := 33;
     end;
   end;

   CreateTable;
 end;
     Table1.Open;
       end;

Или вот тебе еще пример..я б так сделал:

with Query1 do
       begin
       sql.Clear;
       SQL.Add('ALTER TABLE '+QuotedStr('d:\data_cb.DB')+' ADD Field77 integer');
       ExecSQL;
 end;