Hi,
I am finding that I cannot manage to change the fill/border colors of an accessory. Code is as follows but the accessory remains gray.
Thanks,
Ken
ItemsListView2.BeginUpdate;
ItemsListView2.Items.Clear;
...
while not Query.EOF do
begin
Item2:=ItemsListView2.Items.Add;
...
Item2.Accessory:=tviaButton;
Item2.AccessoryWidth:=64;
Item2.AccessoryHeight:=36;
Item2.AccessoryFontColor:=MainBackground;
Item2.AccessoryBorderColor:=MainBackground;
Item2.AccessoryColor:=gcWhite;
Item2.AccessoryText:=Format('%.1f',[Amount],EKMFormatSettings)+'g';
Item2.EnableMoreOptions:=True;
Query.Next;
end;
...
ItemsListView2.EndUpdate;