Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.07;
Скачать: CL | DM;

Вниз

Вопрос по TTreeViev (TTreeNode)   Найти похожие ветки 

 
well   (2002-01-22 13:09) [0]

Столкнулся с проблемой.
Программно добавляю новые узлы в дереве и устанавливаю для него IndexImage и SelectedIndex, затем сохраняю дерево в файле (SaveToFile). Но когда я вновь загружаю дерево из файла (LoadFromFile) иконки исчезают, вернее соответствуют Index=0.
Как сохранить TreeView чтобы и иконки сохранялись?

Второй вопрос. Как привязать к узлу строку, отличную от своиства Text?


 
RoadStar ©   (2002-01-22 13:42) [1]

Для того, чтобы получить такой эффект, необходимо сохранять полностью весь компонент TTreeView.
Попробуй такой код:

procedure SaveTreeView;
var stream:TFileStream;
begin
stream := TFileStream.Create("Tree.view", fmCreate);
stream.StoreComponent(tv); // tv-имя компоненты TTreeView
stream.free;
end;

Только не забудь добавить в секцию Initialization код

RegisterClass(TTreeView);

а в в секцию Finalization

UnRegisterClass(TTreeView);

Должно получиться.

P.S. По поводу второго вопроса - у TTreeNode есть свойство Data
(указатель на чё хочешь), попробуй запихнуть туда строчку в виде PChar.



Страницы: 1 вся ветка

Текущий архив: 2002.02.07;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.011 c
1-18872
AndrewK
2002-01-23 09:54
2002.02.07
Как правильно создать и уничтожить форму


7-19000
Lizard
2001-10-30 20:34
2002.02.07
Как перехватить сообщения об ошибках типа Autefication failed и т.д. при отправке письма ?


4-19036
Alex Y.
2001-12-10 11:43
2002.02.07
---|Ветка была без названия|---


14-18963
VEG
2001-12-15 21:35
2002.02.07
Проблема при разработке графического компонента.


14-18966
Orest
2001-12-18 19:55
2002.02.07
Socrat(переводчик) ну помогите мне найти его!!!