На пустой форме у меня располагается TTreeView. Затем я
сохраняю это в файле, используя WriteComponent. Это работает как положено; я
могу из DOS c помощью команды "type" посмотреть двоичный файл и увидеть его
содержимое, типа строк TTreeView и имя объекта. По крайней мере файл
записывается и создается впечатление его "наполненности".
Затем я освобождаю компонент TTreeView, открываю поток, делаю ReadComponent
и, затем, InsertControl. И получаю исключение "TreeView1 has no parent window"
(TreeView1 не имеет родительского окна).
Это происходит из-за того, что при установке определенных свойств TreeView
требуется дескриптор окна элемента управления, а для этого необходимо иметь
родителя. Решение заключается в создании пустого TreeView и передаче его в
качестве параметра ReadComponent - вы наверняка меня спросите, почему
ReadComponent необходим параметр, правильно? Смотрите дальше.
Убедитесь в отсутствии конфликта имен. Данный код делает форму владельцем
второго TreeView и при ее освобождении разрушает компонент. Я просто
переименовываю существующий TreeView перед загрузкой "клона".
Я установил свойство visible в false перед установкой свойства parent, этим
я предотвратил показ только что созданного TreeView до момента загрузки его из
потока.
Если Вас заинтересовала или понравилась информация по разработке на Delph - "Поточность TreeView", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!