Procedure

TTemplate.SortChildren

Module

uTemplates

Last Modified

7/15/2014 3:26:44 PM

Visibility

Public

Owner

TTemplate

Declaration

procedure SortChildren;

Calls Hierarchy


TTemplate.SortChildren
 ├TTemplate.GetItems
 │ └ExpandTemplate
 │   ├TTemplate.GetChildren
 │   ├GetTemplateChildren
 │   ├AddTemplate
 │   │ ├TTemplate.Create
 │   │ │ └TTemplate.ReminderDialogIEN
 │   │ └TTemplate.AddChild
 │   │   └TTemplate.GetItems...
 │   └TTemplate.ItemIENs
 │     └TTemplate.GetItems...
 ├TTemplate.CanModify
 │ ├TTemplate.ValidID
 │ └LockTemplate
 └TemplateChildrenCompare

Called-By Hierarchy


           TTemplate.SortChildren
TfrmTemplateEditor.mnuSortClick┘ 

Calls

Name Declaration Comments
TTemplate.CanModify function CanModify: boolean; -
TTemplate.GetItems function GetItems: TList; -
TemplateChildrenCompare function TemplateChildrenCompare(Item1, Item2: Pointer): Integer; -

Called-By

Name Declaration Comments
TfrmTemplateEditor.mnuSortClick procedure mnuSortClick(Sender: TObject); -


Source

2063  procedure TTemplate.SortChildren;
2064  begin
2065    GetItems;
2066    if (FItems.Count > 1) and CanModify then
2067      FItems.Sort(TemplateChildrenCompare);
2068  end;