본문 바로가기

Delphi/꿀팁

ListView의 DynamicAppearance로 List에 Image 넣기

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;


반응형