ListView의 ItemAppearance를 DynamicAppearance로 변경합니다.
Structure -> ListView -> Item에서 Add new를 통해 TImageObject를 추가합니다.
만들어진 ImageObject에 원하는 이미지를 넣습니다.
procedure setImage; var tmpListItem : TListViewItem; begin ListView.BeginUpdate;
tmpListItem := ListView.Items.Add; tmpListItem.Objects.DrawableByName('ImageObject Name').Data := Image.Bitmap; //DrawableByName에는 새로 만든 ImageObject 이름을 넣습니다. (※위 사진 참조) 이미지는 TImage에 넣고 불러오면 쉽습니다.
ListView.EndUpdate;
end;
반응형