ms-access - 以编程方式添加到 MS Access 关系图

Question

我有一个应用程序，它带有一个 JET 数据库，包括一个关系图，邀请更多精明的用户查看以深入了解数据库的构造。

当新版本需要新表、新列或修改后的查询时，我的应用程序中还有用于更新数据库结构的代码。我通过 ADO 连接推送 SQL 来做到这一点，它工作正常。

问题是，如果我添加一个带有约束的新表，该约束将它与现有表相关联(例如，我将具有 FK 关系的 EmployeeHobbies 添加到Employees 中的现有PK)，而该表构建正确，则新关系不会出现在关系图中。随着时间的推移，图表变得越来越不完整。

是否有一种编程方法可以强制 Access 从数据库中的约束信息更新其关系图，或者如果失败，关系图是否存储在某个隐藏的系统对象中，我可以直接更新以反射(reflect)我的更改？

编辑:我没有说明我的应用程序是用 Delphi 编写的，而不是 MS Access。拥有 MS Access 副本的用户可以看到关系图，其他人则不能。

Answer 1

我不知道 RunCommand 是否适合，但它的值(value)是:

DoCmd.RunCommand acCmdRelationships
DoCmd.RunCommand acCmdShowAllRelationships