如何处理Delphi FireMonkey TPopupColumn的OnSetValue事件缺失问题？

本文共计369个文字，预计阅读时间需要2分钟。

%E2%80%9CTPopupColumn%28TGrid%29%E4%B8%AD%E7%9A%84%E6%9B%B4%E6%94%B9%E4%B8%8D%E4%BC%9A%E8%A7%A6%E5%8F%91OnSetValue%E4%BA%8B%E4%BB%B6%2C%E5%9B%A0%E6%AD%A4%E6%88%91%E6%97%A0%E6%B3%95%E4%BB%8E%E7%94%A8%E6%88%B7%E8%AE%BE%E7%BD%AE%E7%9A%84%E5%80%BC%E4%B8%AD%E8%8E%B7%E5%8F%96%E8%AF%A5%E5%80%BC%EF%BC%8C%E6%98%AF%E4%BB%80%E4%B9%88%E5%8E%9F%E5%9B%A0%EF%BC%3F%E9%97%AE%E9%A2%98%E5%B7%B2%E5%9C%A8QualityCentral%E4%B8%AD%E6%8A%A5%E5%91%8A%EF%BC%9Ahttp%3A%2F%2Fqc.embarcadero.com%2Fwc%2Fqcmain.aspx%2Fqcmain.aspx%3Fd%3D113448%E2%80%9D

TPopupColumn(TGrid)中的更改不会触发OnSetValue事件,因此我无法从用户设置的值中获取该值(GetValue正常工作).
问题已在QualityCentral： qc.embarcadero.com/wc/qcmain.aspx/qcmain.aspx?d=113448中报告

有没有人找到解决方法？
有没有其他方法可以从TPopupColumn中获取值以便将其与例如OnMouseDown事件相结合？我尝试了TPopupColumn的众多属性但没有效果.

我会很感激任何建议,因为我真的希望将TPopupColumn保留在我的项目中.

我正在使用Delphi XE5和Update 1.

========================解决方案========================= ==

根据Mike Sutton发布的指南,我最终将以下行添加到FMX.Grid.pas文件中的TPopupColumn.CreateCellControl函数.

TPopupCell(Result).OnChange := DoTextChanged;

比我保存了该文件的副本并将其添加到我修复问题的项目中.

创建网格列非常简单.我建议您查看FMX.Grids中的源代码,将其复制到您自己的类中并修复损坏的位.

另外看看monkeystyler.com/guide/Custom-Grid-Columns