Function

TTemplate.Changed

Module

uTemplates

Last Modified

7/15/2014 3:26:44 PM

Visibility

Public

Owner

TTemplate

Declaration

function Changed: boolean;

Calls Hierarchy


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


                           TTemplate.Changed
                             BackupDiffers┤ 
        TfrmTemplateEditor.btnApplyClick┤ │ 
    TfrmTemplateEditor.mnuRefreshClick┘ │ │ 
           TfrmTemplateEditor.FormCreate┤ │ 
           TfrmTemplateEditor.btnOKClick┤ │ 
       TfrmTemplateEditor.FormCloseQuery┘ │ 
                              SaveTemplate┤ 
                        SaveAllTemplates┤ │ 
   TfrmTemplateEditor.btnApplyClick...┤ │ │ 
         TfrmTemplateEditor.btnOKClick┤ │ │ 
     TfrmTemplateEditor.FormCloseQuery┘ │ │ 
            TfrmTemplateEditor.InitTrees┘ │ 
         TfrmTemplateEditor.FormCreate┤   │ 
        TfrmTemplateEditor.RefreshData┘   │ 
  TfrmTemplateEditor.mnuRefreshClick┘     │ 
            TfrmTemplateEditor.UpdateApply┘ 
     TfrmTemplateEditor.edtNameOldChange┤   
   TfrmTemplateEditor.tvTreeNodeEdited┤ │   
    TfrmTemplateEditor.mnuAutoGenClick┘ │   
        TfrmTemplateEditor.cbActiveClick┤   
       TfrmTemplateEditor.cbExcludeClick┤   
         TfrmTemplateEditor.edtGapChange┤   
        TfrmTemplateEditor.reNotesChange┤   
              TfrmTemplateEditor.cbClick┤   
 TfrmTemplateEditor.cbDisplayOnlyClick┤ │   
   TfrmTemplateEditor.cbFirstLineClick┤ │   
 TfrmTemplateEditor.cbOneItemOnlyClick┤ │   
TfrmTemplateEditor.cbHideDlgItemsClick┤ │   
   TfrmTemplateEditor.cbHideItemsClick┤ │   
      TfrmTemplateEditor.cbIndentClick┤ │   
        TfrmTemplateEditor.cbLockClick┘ │   
        TfrmTemplateEditor.cbxTypeChange┤   
     TfrmTemplateEditor.cbxRemDlgsChange┤   
      TfrmTemplateEditor.cbxCOMObjChange┤   
    TfrmTemplateEditor.edtCOMParamChange┤   
          TfrmTemplateEditor.cbxLinkExit┘   

Calls

Name Declaration Comments
TTemplate.ItemIENs function ItemIENs: string; -
TTemplate.ValidID function ValidID: boolean; -

Called-By

Name Declaration Comments
BackupDiffers function BackupDiffers: boolean; -
SaveTemplate procedure SaveTemplate(Template: TTemplate; Idx: integer; ErrorList: TStrings = nil); -
TfrmTemplateEditor.UpdateApply procedure UpdateApply(Template: TTemplate); -


Source

2217  function TTemplate.Changed: boolean;
2218  begin
2219    Result := not ValidID;
2220    with FBkup do
2221    begin
2222      if(not Result) and (SavedPrintName)      then Result := (BPrintName      <> FPrintName);
2223      if(not Result) and (SavedGap)            then Result := (BGap            <> FGap);
2224      if(not Result) and (SavedRealType)       then Result := (BRealType       <> FRealType);
2225      if(not Result) and (SavedActive)         then Result := (BActive         <> FActive);
2226      if(not Result) and (SavedDisplayOnly)    then Result := (BDisplayOnly    <> FDisplayOnly);
2227      if(not Result) and (SavedFirstLine)      then Result := (BFirstLine      <> FFirstLine);
2228      if(not Result) and (SavedOneItemOnly)    then Result := (BOneItemOnly    <> FOneItemOnly);
2229      if(not Result) and (SavedHideDlgItems)   then Result := (BHideDlgItems   <> FHideDlgItems);
2230      if(not Result) and (SavedHideItems)      then Result := (BHideItems      <> FHideItems);
2231      if(not Result) and (SavedIndentItems)    then Result := (BIndentItems    <> FIndentItems);
2232      if(not Result) and (SavedLock)           then Result := (BLock           <> FLock);
2233      if(not Result) and (SavedExclude)        then Result := (BExclude        <> FExclude);
2234      if(not Result) and (SavedDialog)         then Result := (BDialog         <> FDialog);
2235      if(not Result) and (SavedPersonalOwner)  then Result := (BPersonalOwner  <> FPersonalOwner);
2236      if(not Result) and (SavedReminderDialog) then Result := (BReminderDialog <> fReminderDialog);
2237      if(not Result) and (SavedCOMObject)      then Result := (BCOMObject      <> FCOMObject);
2238      if(not Result) and (SavedCOMParam)       then Result := (BCOMParam       <> FCOMParam);
2239      if(not Result) and (SavedFileLink)       then Result := (BFileLink       <> FFileLink);
2240      if(not Result) and (SavedBoilerplate)    then Result := (BBoilerplate    <> FBoilerplate);
2241      if(not Result) and (SavedDescription)    then Result := (BDescription    <> FDescription);
2242      if(not Result) and (SavedItemIENs)       then Result := (BItemIENs       <> ItemIENs); // Keep last
2243    end;
2244  end;