带有 Firemonkey 和 Delphi XE2 的 DB Lookup 字段答案

【问题标题】：DB Lookup field with Firemonkey and Delphi XE2带有 Firemonkey 和 Delphi XE2 的 DB Lookup 字段
【发布时间】：2011-11-19 18:21:21
【问题描述】：

我找不到将 TCombobox 与 Firemonkey 中的查找字段绑定的方法。在 VCL 中，您有一个 TDBLookupComboBox，它只需要一个 TDatasource 组件和查找字段名称来填充组合框列表。通过这种方式，您可以在运行时轻松编辑 FK 字段。

在 Firemonkey 中，你只有 Livebindings，我不知道如何设置相同的行为。到目前为止，我所做的最好的事情是使用 TBindList 填充组合框列表，并使用连接到查找字段的 TBindDBListLink。以这种方式它似乎可以工作，但组合框不允许我更改所选项目。

这是数据库应用程序应该具备的最基本的东西之一，但我不明白为什么还没有人谈论它。

【问题讨论】：

【解决方案1】：

你可以从这个SVN地址下载Delphi XE2 LiveBinding Demos：

下载后，您可以找到一个名为 bindlookup 的演示项目。它演示了如何使用 LiveBinding 创建查找列表。

【讨论】：

您好 vcldeveloper，感谢您抽出宝贵时间。 bindlookup 演示并不完全符合我的要求，因为绑定是在填充列表框中的选定项和 TClientDataset 的当前记录之间完成的。按照您的建议，我想出了如何更改它以将我的组合框中的选定项目索引与我的 TClientDataset 的外键 ID 绑定。魔术是由 TBindPosition 绑定完成的。它现在似乎可以工作，但我必须手动将 TClientDataset 置于编辑/插入模式（Combobox OnChange 事件？）我想念旧的 TDBLookupCombobox :°)
链接已失效。（该网站无法通过回程机访问）