![]() |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]()
|
|
| AntonPavlov |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 86 Регистрация: 28.5.2010 Репутация: нет Всего: нет |
Имеется TreeView. Надобно сделать так, чтобы к каждому элементу дерева можно было прицепить какую-нибудь информацию. Вот типа как написано здесь:
http://www.odelphi.ru/index.php?newsid=110 Я так и сделал - но как все это дело сохранять в файле и загружать из него? Помогите, плиз, очень нужно! |
|||
|
||||
| Akella |
|
|||
![]() Творец ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 36 Всего: 329 |
||||
|
||||
| AntonPavlov |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 86 Регистрация: 28.5.2010 Репутация: нет Всего: нет |
Спасибо, ты мне очень помог!
Не знаешь, так молчал бы сидел! |
|||
|
||||
| Rrader |
|
|||
|
Inspired =) ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 1535 Регистрация: 7.5.2005 Репутация: 70 Всего: 191 |
Можно посмотреть на код procedure TTreeStrings.LoadTreeFromStream(Stream: TStream); и procedure TTreeStrings.SaveTreeToStream(Stream: TStream);
Код находится в модуле ComCtrls.pas. Идея - иерархия дерева (Levels) восстанавливается на основе количества отступов в тексте, как тут: Корневой узел (RootNode) Дочерний узел 1 Дочерний узел 1.1 Дочерний узел 1.2 Дочерний узел 2 Дочерний узел 2.1 Сохранить данные можно таким же образом, через файловый поток. Код SaveTreeToStream уже написан, нужно лишь поменять пару строк, чтоб писать свои данные (только не указатель на запись, а непосредственно данные, значения всех полей). Данные пишутся в таком порядке: сначала размер, потом значение. LoadTreeFromStream показывает идею загрузки, там меняем пару строк, чтобы читать данные нашего формата. В таком же порядке: сначала размер, потом значение. |
|||
|
||||
| AntonPavlov |
|
|||
|
Шустрый ![]() Профиль Группа: Участник Сообщений: 86 Регистрация: 28.5.2010 Репутация: нет Всего: нет |
Ну, спасибо, идея более-менее ясна, буду пытаться делать...
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |