[Страдалецъ]

MDB можно создать самому через ADOX.
Примерно это выглядит так:

Код:

Uses Variants,ComObj;
Var
  Mdb,Tbl,Idx: Variant;
  NameDB,PathDB: String;
begin
     NameDB := ExtractFileName(dbName);
     PathDB := ExtractFilePath(Application.ExeName);
     AppDB.ConnectionString := Format('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s',[PathDB+NameDB]);
      Mdb := CreateOleObject('ADOX.Catalog');
      Mdb.Create(AppDB.ConnectionString); 
      Tbl := CreateOleObject('ADOX.Table');
      Tbl.Name := 'Test';
      Tbl.ParentCatalog := Mdb;
      Tbl.Columns.Append('IntField', adInteger);
      Tbl.Columns.Append('TextField', adVarWChar, 50);
      Mdb.Tables.Append(Tbl);
      Idx := CreateOleObject('ADOX.Key');
      Idx.Name := 'PK_Index';
      Idx.Type := adKeyPrimary;
      Idx.Columns.Append('IntField');
      Mdb.Tables[Tbl.Name].Keys.Append(Idx);
end;