Procedure

TTemplate.SetIndentItems

Module

uTemplates

Last Modified

7/15/2014 3:26:44 PM

Visibility

Protected

Owner

TTemplate

Declaration

procedure SetIndentItems(const Value: boolean);

Calls Hierarchy


TTemplate.SetIndentItems
 ├TTemplate.CanModify
 │ ├TTemplate.ValidID
 │ └LockTemplate
 └TTemplate.ValidID

Called-By Hierarchy


                  TTemplate.SetIndentItems
              TfrmTemplateEditor.cbClick┘ 
 TfrmTemplateEditor.cbDisplayOnlyClick┤   
   TfrmTemplateEditor.cbFirstLineClick┤   
 TfrmTemplateEditor.cbOneItemOnlyClick┤   
TfrmTemplateEditor.cbHideDlgItemsClick┤   
   TfrmTemplateEditor.cbHideItemsClick┤   
      TfrmTemplateEditor.cbIndentClick┤   
        TfrmTemplateEditor.cbLockClick┘   

Calls

Name Declaration Comments
TTemplate.CanModify function CanModify: boolean; -
TTemplate.ValidID function ValidID: boolean; -

Called-By

Name Declaration Comments
TfrmTemplateEditor.cbClick procedure cbClick(Sender: TCheckBox; Index: integer); -


Source

2327  procedure TTemplate.SetIndentItems(const Value: boolean);
2328  begin
2329    if(FIndentItems <> Value) and CanModify then
2330    begin
2331      with FBkup do
2332      begin
2333        if(not SavedIndentItems) and ValidID then
2334        begin
2335          BIndentItems := FIndentItems;
2336          SavedIndentItems := TRUE;
2337        end;
2338      end;
2339      FIndentItems := Value;
2340    end;
2341  end;