| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TTreeView [D6]
Витьок © (2002-12-14 10:39:00)Помогите!!! Как отсортировать такое дерево по алфавиту.
Постоянно оно полностью пересоздаётся. Создаются предки, а у каждого, только один уровень детей.
Нужно отсортировать отдельно предков, а потом и их детей.
(TTreeView.SortType - не помогает)
MBo (2002-12-14 11:55:00) [1]а в хелпе есть пример.
function CustomSortProc(Node1, Node2: Integer; Data: Integer): Integer; stdcall;
begin
Result :=0;
if TTreeNode(Node1).Parent=TTreeNode(Node2).Parent then
Result:= 2*Integer(TTreeNode(Node1).Text>PChar(TTreeNode(Node2).Text))-1;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
TreeView1.CustomSort(CustomSortProc,0);
end;
в (2002-12-14 11:28:00) [2]Непонял, можно пример?
Song (2002-12-14 10:43:00) [3]TTreeView.SortType ?
MBo (2002-12-14 10:43:00) [4]Используй CustomSort, разрешая переставлять ноды только с одинаковым родителем.
| |
