Delphi 2009、MyDAC 和关系数据库

Question

关于在 Delphi 2009 中使用 MyDAC 的关系数据库概念，我遇到了很大的问题。

我有一个看起来像下面这样的数据库结构：

---

Item

• id
• name

---

Storage

• id
• name

---

StorageItem

• id
• item_id
• storage_id
• place

---

现在，当我有来自“Item”的活动数据集时，如何在 DBGrid 中显示所有关联的存储？

顺便说一句：最好不要在每个表中使用“id”，而是更改它并使用“id_item”或“id_storage”之类的内容？

先感谢您 ：）

Answer 1

• 使用 StorageItem 您创建了一个
  多对多关系。 如果你
  只需要一对多（许多存储
  与一项相关，但您
  不需要反之亦然），那么你
  可能只是添加另一个字段
  存储表（item_id）
  是 Items 表的外键。
  然后你创建一个索引
  存储表中的item_id，以及
  连接
  中的两个表
  主从关系。
• 如果您确实需要多对多，那么您
  可以使用 SQL 添加查询组件
  （从 StorageItem 中选择 *，其中
  item_id := :current_storage_id)，以及
  current_storage_id 是您的查询的
  范围。

Answer 2

Select a.ID, b.Name, a.Place
from StorageItem a
inner join Storage b
on (a.id = b.id)

上面的查询将返回 StorageItem 表中的所有项目及其名称，现在，如果您想过滤它以仅返回特定项目的项目，请添加 where 子句，就像

Select a.ID, b.Name, a.Place
from StorageItem a
inner join Storage b
on (a.id = b.id)
where a.item_id = 1 -- place the item id here

您可以使用带有参数的 where ，例如：

MyQuery.Sql.Text := ' Select a.ID, b.Name, a.Place from StorageItem a
+ ' inner join Storage b on (a.id = b.id) '
+ ' where a.item_id = :ItemNo ';
MyQuery.ParamByName('ItemNo').asInteger := 1;
MyQuery.Open;

并分配上面的查询对于 dbGrid

，您还可以使用 MasterSource 属性来建立关系，而无需使用“where”部分

Answer 3

我个人对 MyDAC 并不熟悉，但大多数数据集组件都有某种方法来建立主从关系。 检查数据集上是否有 MasterSource 属性，或者是否存在将详细数据集链接到主数据集的类似方法。 如果没有，您可以使用 TDatasetField 建立链接，并过滤嵌套数据集以仅显示正确的记录。

至于 ID 列名称，最好为每个字段指定一个描述性名称，这样您就可以通过查看代码来判断链接是否正确。 如果您将 id 列称为“id”，那么它可以是任何 id 列，如果您开始传递对数据集的引用，则可能会造成混乱。 但是，如果每次都调用 item_id（有时不是 item_id，有时是 id_item），那么您总是确切地知道自己在看什么。 它也让您更容易知道您的代码是正确的。 过滤器显示“master.item_id =Detail.item_id”更容易阅读“master.id=detail.item_id”。 例如，如果将 master 分配给错误的数据集，这可能是错误的并且会默默失败。