遵循“RAD Studio\12.0\Samples\FireMonkey\CustomListBox”中的 EMB 示例“自定义列表”
它通过代码演示了如何在 ListBox 上自定义项目。
通过代码在 TListBox 上插入一项:
// create custom item
Item := TListBoxItem.Create(nil);
Item.Parent := ListBox1;
Item.StyleLookup := 'CustomItem';
Item.Text := 'item ' + IntToStr(Item.Index); // set filename
if Odd(Item.Index) then
Item.ItemData.Bitmap := Image1.Bitmap // set thumbnail
else
Item.ItemData.Bitmap := Image2.Bitmap; // set thumbnail
Item.StylesData['resolution'] := '1024x768 px'; // set size
Item.StylesData['depth'] := '32 bit';
Item.StylesData['visible'] := true; // set Checkbox value
我想专门使用 LiveBinding 来做同样的事情。
我可以成功展示样式并绑定一些项目:
还有一些 LiveBindings(使用原型):
这是来自 delphi 示例的自定义样式的一部分:
我的问题:
- 如何访问其他 3 个已定义的项目以填充数据?
- 如何从 Button 和 CheckBox 获取事件(都转到相同的事件处理程序)
- 我怎样才能使它在一个框架中工作?设计时没有可用的样书组件
奖金问题:)
是否可以使用专门针对这种需求的样书进行上述所有工作?(一个包含所有且仅包含 TListBoxItems Sytles 的样书?),所以不要弄乱表单定义的样书。