Лучше всего создавать Акцесовскую БД с помощью ADOX.
Выглядит это примерно так:
Код:
Const
adVarWChar = 202;
Var
Mdb,Tbl: Variant;
begin
Mdb := CreateOleObject('ADOX.Catalog');
Mdb.Create('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\demo.mdb');
Tbl := CreateOleObject('ADOX.Table');
Tbl.Name := 'DemoTable';
Tbl.ParentCatalog := Mdb;
Tbl.Columns.Append('DemoAutoIncField', adInteger);
Tbl.Columns['DemoAutoIncField'].Properties['AutoIncrement'].Value := True;
Tbl.Columns.Append('DemoTextField', adVarWChar, 50);
Mdb.Tables.Append(Tbl);
end.