Оптимизированная библиотека деревьев для Delphi и Pascal с примерами использования Virtual Treeview

Delphi , Синтаксис , Деревья

При работе с большими данными в дереве, одним из самых популярных компонентов в Delphi является Virtual Treeview (VT). Однако, для хранения и управления данными в дереве может потребоваться дополнительная библиотека деревьев, которая не только не занимает много памяти, но и обеспечивает быстрый доступ к данным. В этом материале мы рассмотрим одну из таких библиотек - rmTreeNonView.

rmTreeNonView

rmTreeNonView - это невизуальный компонент, который можно использовать как структуру данных для хранения информации в дереве. Он предоставляет быстрый доступ к данным и имеет минимальное потребление памяти. Библиотека rmControls, содержащая rmTreeNonView, доступна на многих сайтах для загрузки, и, хотя компания Mills Enterprise, похоже, больше не в бизнесе, библиотека все еще доступна и работает с современными версиями Delphi.

Использование rmTreeNonView с Virtual Treeview

Одним из преимуществ rmTreeNonView является то, что он дублирует многие методы и свойства TTreeView, что облегчает его использование с Virtual Treeview. Ниже приведен пример кода, демонстрирующий, как связать rmTreeNonView с Virtual Treeview:

type
  //Virtual tree record stuff
  PNodeData = ^TNodeData;
  TNodeData = record
  public
    NodeSelf: PVirtualNode;         //Ptr to our own VT node...needed?
    ContextNode: TmwDataTreeNode;        //ptr to our corresp node of data tree
    GridRecordIndex: integer;      //Grid.RecordIndex of our corresp Alloc formula.
  end;

procedure TForm1.PopulateVT;
var
  n: TmwDataTreeNode;
begin
  VT.NodeDataSize := SizeOf(TNodeData);
  VT.BeginUpdate;
  vtsChangeFontSize(VT, Self.Font.Size);
  //Add DragDrop Tree nodes
  n := AllocController.SnapContext.Tree.Items.GetFirstNode;
  while n <> nil do begin
    AddVTNode(nil, n);              //nil=parent node of top-level VT nodes
    n := n.GetNextSibling;
  end;
  VT.FullExpand;
  VT.EndUpdate;
end;

procedure TForm1.AddVTNode(VTParentNode: PVirtualNode; n: TmwDataTreeNode);
var
  NodeData: PNodeData;
  VTNode: PVirtualNode;
begin
  if (n = nil) or not NodeInIncludeFilter(n) then
    exit;
  //Add this node
  VTNode := VT.AddChild(VTParentNode);
  NodeData := VT.GetNodeData(VTNode);
  VT.ValidateNode(VTNode, False);
  with NodeData^ do begin
    NodeSelf := VTNode;
    ContextNode := n;
    GridRecordIndex := -1;
  end;
  //Add child nodes
  n := n.GetFirstChild;
  while n <> nil do begin
    AddVTNode(VTNode, n);
    n := n.GetNextSibling;
  end;
end;

В этом примере показано, как заполнить Virtual Treeview данными из rmTreeNonView. Функция PopulateVT добавляет все узлы из rmTreeNonView в Virtual Treeview, а функция AddVTNode рекурсивно добавляет узлы и их потомков в Virtual Treeview.

Вывод

rmTreeNonView - это мощная библиотека деревьев, которая может использоваться в сочетании с Virtual Treeview для создания быстрых и memory-friendly приложений в Delphi и Pascal. Несмотря на то, что компания Mills Enterprise больше не в бизнесе, библиотека все еще доступна и работает с современными версиями Delphi. Если вам нужна оптимизированная библиотека деревьев для работы с большими данными, rmTreeNonView заслуживает вашего внимания.

Подтвержденный ответ: rmTreeNonView - это отличный выбор для использования в сочетании с Virtual Treeview в приложениях, требующих быстрого доступа к большим данным в дереве.

Альтернативный ответ: Если вам нужна большая гибкость и контроль над структурой данных, рассмотрите возможность создания собственной структуры данных на основе таких паттернов, как списки связей, массивы, очереди, хэш-списки/словари, красные/черные деревья и т. д. Библиотеки, подобные EZDSL, могут предоставить вам основные строительные блоки для начала работы. Также стоит рассмотреть возможность использования базы данных для хранения и управления данными в дереве.

Создано по материалам из источника по ссылке.

Материал описывает использование библиотеки rmTreeNonView в сочетании с Virtual Treeview в Delphi и Pascal для быстрого доступа к большим данным в дереве.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Деревья ::