Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB19_AddObjectFirst.shtml

Глава 19. TTreeNodes.AddObjectFirst

Метод AddObjectFirst

Затрагиваемые объекты TTreeNodes
Назначение Метод AddObjectFirst добавляет узел дерева и его данные к началу древовидного представления.
Объявление function AddObjectFirst(Node: TTreeNode; const S: string; Ptr: Pointer): TTreeNode;
Параметры  
    Node Узел, подлежащий добавлению.
    S Текст заголовка для нового узла.
    Ptr Указатель на данные, ассоциированные с новым узлом.
Пример синтаксиса
Var
   Form1: TForm1;
   MyNewNode: TTreeNode;
   MyData: PChar;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
   MyNewNode := TTreeNode.Create(TreeView1.Items);
   MyNewNode.Text := 'this is a new node';
   MyData := 'This is the data associated with the new node';
   MyNewNode.Data := MyData;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
   MyNewNode := TreeView1.Items.AddObjectFirst(TreeView1.Items[0],
                MyNewNode.Text, MyNewNode.Data); 
end;
Описание        AddObjectFirst функционально эквивалентен Add First, за исключением того, что добавляемый узел дерева ассоциирован с внешними данными, указанными параметром Ptr. Метод используется для вставки узла дерева в начало родственной группы (поддерево), содержащей узел, указанный параметром Node. Все существующие узлы в поддереве для принятия нового узла смещаются вниз. Параметр S указывает текст заголовка, который будет идентифицировать новый узел.

Предупреждение
       Delphi не будет автоматически распределять память для информации, определяемой свойством Data.

[Свойство AbsoluteIndex] [Метод AlphaSort] [Метод Collapse] [Свойство Count] [Свойство Cut] [Свойство Data] [Метод Delete] [Метод DeleteChildren] [Свойство Deleting] [Свойство DropTarget] [Метод EditText] [Метод EndEdit] [Метод Expand] [Свойство Expanded] [Свойство Focused] [Метод GetFirstChild] [Метод GetLastChild] [Метод GetNext] [Метод GetNextChild] [Метод GetNextSibling] [Метод GetNextVisible] [Метод GetPrev] [Метод GetPrevChild] [Метод GetPrevSibling] [Свойство Handle] [Метод HasAsParent] [Свойство HasChildren] [Свойство ImageIndex] [Свойство Index] [Свойство IndexOf] [Свойство IsVisible] [Свойство Item] [Свойство Level] [Метод MakeVisible] [Метод MoveTo] [Свойство OverlayIndex] [Свойство Parent] [Свойство SelectedIndex] [Свойство StateIndex] [Свойство Text] [Свойство TreeView]

[Метод Add] [Метод AddChild] [Метод AddChildFirst] [Метод AddChildObject] [Метод AddChildObjectFirst] [Метод AddFirst] [Метод AddObject] [Метод AddObjectFirst] [Метод BeginUpdate] [Метод Clear] [Свойство Count] [Метод Delete] [Метод EndUpdate] [Метод GetFirstNode] [Свойство Handle] [Метод Insert] [Метод InsertObject] [Свойство Owner]

Смотри также "Древовидные структуры в БД"
и "Древовидные структуры в БД изд.2"


<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:56 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB19_AddObjectFirst.shtml