Исправил
Вот кусок программы:
Код:
procedure TForm1.Button2Click(Sender: TObject);
begin
Table1.Active:=false;
Table1.Close;
Table1.TableName:='foo';
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add ('ALTER TABLE FOO ADD column SSS STRING NOT NULL UNIQUE');
Query1.ExecSQL;
end;
при нажатии на кнопку появляется сообщение "Capability not supported"