Создание таблиц Sql, Как задать значени по Default Опции

[YurKaluga]

Проблема вот в чем - создаю таблицу с помощью Query:

Код

 Query1.SQL.Text:='Create table Teams '+
                 '(Code            Autoinc,'+
                 ' Name            character(50),'+
                 ' Country         SmallInt DEFAULT 1,'+
                 ' City            SmallInt,'+
                 ' Trainer         character(150),'+
                 ' Glasses         SmallInt DEFAULT 0,'+
                 ' Primary Key (Code))';
 Query1.ExecSQL;

Таблица создается, но значения по-умолчанию не цепляются. :fire:
Почему?
Может знаете?

[hiv]

Блин изврат какой.... не получается... там даже не все определения ALTER TABLE есть... Выкинь BDE и работай с нормальными СУБД (хотябы Interbase, Firebird). Там для создания БД нужно просто скриптик запустить или команду дать (что из Дельфей тоже можно сделать через WinExec)

[YurKaluga]

Да фигня в том, что программа уже написана, база готова. Я сначала делал копирование эталонных таблиц, но при копировании куда-то деваются индексы, т.е. поле есть, написано, что оно индексное, а индексов нет. А еще неудобно за собой таскать папку с эталонами. Поэтому и решил таблички создавать из программы. А переписывать на другую СУБД уже поздно - в программе одних форм уже штук 40 и почти на каждой есть Query или Table и не по-одной.
Плюс, программа работает с локальной БД, так что ставить вместе с ней что-то серьезное не серьезно. Есть конечно задумка переписать на сервер, но неохота - слишком много лопатить прийдется.
Ладно, спасибо за возню со мной. Буду думать что-нибудь еще.