如何在Delphi XE4中使用ADOX组件？

Question

我在Delphi 6编写的教程中读到:要安装ADOX组件,请从主菜单Project\Add type Library菜单项中选择.但是在Delphi XE4中没有这样的菜单项.如何在Delphi XE4中安装/使用ADOX组件以编程方式创建一个空的mdb数据库？或者有没有其他方法可以在没有ADOX的情况下创建它？

Answer 1

您可以使用后期绑定而无需导入类型库,例如:

uses ComObj;

procedure CreateNewMDB(const FileName: WideString);
var
  AdoX: OleVariant;
begin
  AdoX := CreateOleObject('ADOX.Catalog');
  AdoX.Create('Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source=' + FileName);
end;

如果这就是您所需要的,我认为导入ADOX类型库并不值得.