Во первых, эти 2 строчки равносильны, т.е. можно оставить одну из них
Код:
Table1.Active:=false;
Table1.Close;
Перед выполнением запроса убедитесь, точно ли вы не работаете с таблицами другими компонентами одновременно с запросом. Т.е. перед ExecSQL закройте все активные Table. И проверте нет ли *.LCK файлов.
Да и в запросе ошибка, попробуйте так:
Код:
Query1.SQL.Add ('ALTER TABLE FOO ADD SSS VARCHAR(20) NOT NULL UNIQUE');