IgorPI
@IgorPI

Как вставить изображение в ListView используя DynamicAppearance?

procedure TProjectManager.lvProjectsDblClick(Sender: TObject);
var
  enum: System.Generics.Collections.TEnumerator<TListViewItem>;
  Size: TSize;
begin
  if not Assigned(lvProjectItem) then
    exit;

//  enum := (Sender as TListView).Items.GetEnumerator;
//  while enum.MoveNext do
//  begin
//    enum.Current.Data['status'] := ''
//  end;

  lvProjectItem.Data['image_status'] := // Сюда хочу засунуть изображение


  CurrentProject := lvProjectItem.TagObject as TProject;

  INI.WriteInteger('CurrentProject', 'id', CurrentProject.id);
  INI.WriteString('CurrentProject', 'name', CurrentProject.name);
  INI.WriteString('CurrentProject', 'comment', CurrentProject.comment);
  INI.WriteString('CurrentProject', 'create_at', CurrentProject.create_at);
end;


5d6fab30a8419457952860.png
  • Вопрос задан
  • 54 просмотра
Решения вопроса 1
IgorPI
@IgorPI Автор вопроса
Решение!

lvProjectItem.Data['image_status']:= TValue.From(ImageList.Bitmap(TSize.Create(32,32), 1));
Ответ написан
Комментировать
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы