| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

TreeView изменить размеры элементов.

@!!ex ©   (2010-03-03 23:39:00) 

Задача в том, чтобы вместо некоторых элементов нарисовать картинку размеро 64х64, соответственно элемент должен быть большой, чтобы корректно эту картинку вместить.
не нашел свойств отвечающих эа это.
У ListView ItemHeight, а тут ничего такого нет.

---

@!!ex   (2010-03-04 08:31:00) [1]

Спасибо!

---

Игорь Шевченко   (2010-03-04 00:25:00) [2]

у TreeView есть свойство OwnerDraw - хоть слона и мышь рисуй в одном дереве.

Как делал я, когда мне надо было в одном TreeView отобразить элементы разной высоты:

procedure TfSimilarMembers.DisplayTree;
var
 I, J: Integer;
 Node, ChildNode: TTreeNode;
 ItemEx: TTVITEMEX;
begin
 TreeView.Items.Clear;
 for I := 0 to dmMemberEx.MemberTree.Count - 1 do
 begin
   Node := TreeView.Items.AddObject(nil, dmMemberEx.MemberTree[I].DisplayText,
     dmMemberEx.MemberTree[I]);
   for J := 0 to dmMemberEx.MemberTree[I].Details.Count - 1 do
   begin
     ChildNode := TreeView.Items.AddChildObject(Node,
       dmMemberEx.MemberTree[I].Details[J].DisplayText,
       dmMemberEx.MemberTree[I].Details[J]);
     ItemEx.mask := TVIF_INTEGRAL;
     ItemEx.hItem := ChildNode.ItemId;
     ItemEx.iIntegral :=
       dmMemberEx.MemberTree[I].Details[J].Info.DisplayLinesCount + 2;
     SendMessage (TreeView.Handle, TVM_SETITEMA, 0, LPARAM(@ItemEx));   
   end;
 end;
end;

---

Наверх