delphi - 双向 TLinkPropertyToField 绑定

Question

我有一个 TLinkPropertyToField 使用 ItemIndex 属性将一个 TRAdioGroup（自定义）绑定到一个字段，但我不知道为什么它没有将更改传递给 DataSet

代码：

auxLink := TLinkPropertyToField.Create(aOwner);
auxLink.Component := aOwner.FindComponent(aField.FieldName);
auxLink.ComponentProperty := 'ItemIndex';
auxLink.DataSource := BindSource;
auxLink.FieldName := aField.FieldName;
auxLink.Active := true;

Answer 1

不幸的是，TLinkPropertyToField自然不会提供所请求的功能。请参阅文档：

提示：此组件的用户输入不使用观察者进行监控。

换句话说，链接只是一种方式。

您需要ItemIndex手动传递更改或子类化TLinkPropertyToField添加观察者功能。我怀疑这是否值得。