Поиск узла

  1. Для структур с данными простого типа:

 

FindNextNode({TreeID,} "Data" = Key1)

 

  1. Для структур с данными типа простой структуры:

 

FindNextNode({TreeID,} Field1$ = Key1, Field2$ = Key2)

 

Функция осуществляет поиск узла с данными, удовлетворяющими условиям поиска. Если такой узел найден, то функция возвращает его индентификатор, иначе возвращается нулевое значение. При первом обращении процедура начинает искать с начала структуры, при каждом следующем – с последнего найденного элемента. Для инициализации поиска следует воспользоваться процедурой ResetSearch.

 

Пример:

 

i: integer;

data: record

  x: real;

  y: real;

  s: string;

end;

CreateTree(i, 1);

CreateTree(data, 2);

...

nID=FindNextNode(1, "Data"=10);

ReserSearch;

nID=FindNextNode(2, "x"=50, "y"=100);

 

Подсистема Tree