Function

BackupDiffers

Module

uTemplates

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Declaration

function BackupDiffers: boolean;

Calls Hierarchy


BackupDiffers
 └TTemplate.Changed
   ├TTemplate.ValidID
   └TTemplate.ItemIENs
     └TTemplate.GetItems
       └ExpandTemplate
         ├TTemplate.GetChildren
         ├GetTemplateChildren
         ├AddTemplate
         │ ├TTemplate.Create
         │ │ └TTemplate.ReminderDialogIEN
         │ └TTemplate.AddChild
         │   └TTemplate.GetItems...
         └TTemplate.ItemIENs...

Called-By Hierarchy


                         BackupDiffers
    TfrmTemplateEditor.btnApplyClick┤ 
TfrmTemplateEditor.mnuRefreshClick┘ │ 
       TfrmTemplateEditor.FormCreate┤ 
       TfrmTemplateEditor.btnOKClick┤ 
   TfrmTemplateEditor.FormCloseQuery┘ 

Calls

Name Declaration Comments
TTemplate.Changed function Changed: boolean; -

Called-By

Name Declaration Comments
TfrmTemplateEditor.btnApplyClick procedure btnApplyClick(Sender: TObject); -
TfrmTemplateEditor.btnOKClick procedure btnOKClick(Sender: TObject); -
TfrmTemplateEditor.FormCloseQuery procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean); -
TfrmTemplateEditor.FormCreate procedure FormCreate(Sender: TObject); -


Source

722   function BackupDiffers: boolean;
723   var
724     i: integer;
725   
726   begin
727     Result := FALSE;
728     if(assigned(Templates)) then
729     begin
730       for i := 0 to Templates.Count-1 do
731       begin
732         if(TTemplate(Templates.Objects[i]).Changed) then
733         begin
734           Result := TRUE;
735           exit;
736         end;
737       end;
738     end;
739   end;