我有一个有趣的问题。我将FMX应用程序从XE7重新编译为XE10.1 我有ListBox的表单,我动态地在代码中创建TListBoxItem。
var
Item: TListBoxItem;
begin
Item := TListBoxItem.Create(nil);
Item.Parent := ListBox1;
Item.StyleLookup := 'listboxitemnodetail';
Item.Height:=50;
Item.WordWrap:=true;
Item.Text := 'abc';
Item.ItemData.Bitmap.LoadFromFile('img.bmp')
end;
但ListBox项目中的图像未显示。此问题仅适用于Delphi XE 10.1 Berlin。 在Delphi XE7上它工作正常。
如果我在IDE代码中手动生成ListBoxItem工作正常
哪里有问题?
答案 0 :(得分:2)
问题已修复!
在XE10中必须在Bitmap Load后设置StyleLookup!