Попробуйте немного по другому описать ключ:
Код:
create table Test (id counter(1,1) primary key, ...
У меня без проблем все нормально создается и вводится:
Код:
DataSource1.DataSet := nil;
ADOQuery1.SQL.Text := 'create table Test (id counter(1,1) primary key, Context char(50))';
ADOQuery1.ExecSQL;
ADOQuery1.SQL.Text := 'select * from Test';
ADOQuery1.Open;
DataSource1.DataSet := ADOQuery1;