Procedure

RemoveAllNodes

Module

uTemplates

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Declaration

procedure RemoveAllNodes;

Called-By Hierarchy


                  RemoveAllNodes
TfrmTemplateEditor.FormDestroy┘ 

Called-By

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


Source

632   procedure RemoveAllNodes;
633   var
634     i: integer;
635   
636   begin
637     if(assigned(Templates)) then
638     begin
639       for i := 0 to Templates.Count-1 do
640         TTemplate(Templates.Objects[i]).FNodes.Clear;
641     end;
642   end;