Function

TTemplate.FullBoilerplate

Module

uTemplates

Last Modified

7/15/2014 3:26:44 PM

Comments

Returns the complete boilerplate, including a group's items

Visibility

Public

Owner

TTemplate

Declaration

function FullBoilerplate: string;

Calls Hierarchy


TTemplate.FullBoilerplate
 ├TTemplate.GetBoilerplate
 │ └GetTemplateBoilerplate
 ├TTemplate.ItemBoilerplate
 │ ├TTemplate.GetItems
 │ │ └ExpandTemplate
 │ │   ├TTemplate.GetChildren
 │ │   ├GetTemplateChildren
 │ │   ├AddTemplate
 │ │   │ ├TTemplate.Create
 │ │   │ │ └TTemplate.ReminderDialogIEN
 │ │   │ └TTemplate.AddChild
 │ │   │   └TTemplate.GetItems...
 │ │   └TTemplate.ItemIENs
 │ │     └TTemplate.GetItems...
 │ ├TTemplate.GetTemplateType
 │ ├DlgText
 │ └TTemplate.DialogProperties
 │   ├TTemplate.GetBoilerplate...
 │   └TTemplate.DlgID
 ├DlgText
 └TTemplate.DialogProperties...

Called-By Hierarchy


                            TTemplate.FullBoilerplate
                                  TTemplate.GetText┤ 
                     ExecuteTemplateOrBoilerPlate┤ │ 
                           TfrmDrawers.InsertText┤ │ 
                TfrmDrawers.tvTemplatesDblClick┤ │ │ 
                 TfrmDrawers.tvTemplatesKeyDown┤ │ │ 
                     TfrmDrawers.NewRECDragDrop┤ │ │ 
               TfrmDrawers.SetRichEditControl┘ │ │ │ 
                      TfrmDCSumm.FormCreate┤   │ │ │ 
                    TfrmConsults.FormCreate┤   │ │ │ 
                     TfrmSurgery.FormCreate┤   │ │ │ 
                       TfrmNotes.FormCreate┘   │ │ │ 
             TfrmDrawers.mnuInsertTemplateClick┘ │ │ 
       TfrmDCSumm.popSummMemoInsTemplateClick┤   │ │ 
     TfrmConsults.popNoteMemoInsTemplateClick┤   │ │ 
      TfrmSurgery.popNoteMemoInsTemplateClick┤   │ │ 
        TfrmNotes.popNoteMemoInsTemplateClick┘   │ │ 
              TfrmDrawers.mnuPreviewTemplateClick┤ │ 
             TfrmDCSumm.popSummMemoPreviewClick┤ │ │ 
           TfrmConsults.popNoteMemoPreviewClick┤ │ │ 
            TfrmSurgery.popNoteMemoPreviewClick┤ │ │ 
              TfrmNotes.popNoteMemoPreviewClick┘ │ │ 
                 TfrmDrawers.mnuCopyTemplateClick┤ │ 
                 TfrmTemplateEditor.mnuBPTryClick┘ │ 
               TfrmTemplateEditor.tvTreeKeyDown┘   │ 
              TfrmTemplateEditor.DisplayBoilerplate┤ 
                      TfrmTemplateEditor.ShowInfo┤ │ 
                                  EditTemplates┤ │ │ 
          TfrmDCSumm.popSummMemoTemplateClick┤ │ │ │ 
               TfrmDCSumm.mnuNewTemplateClick┤ │ │ │ 
             TfrmDCSumm.mnuEditTemplatesClick┤ │ │ │ 
       TfrmDCSumm.mnuEditSharedTemplatesClick┤ │ │ │ 
         TfrmDCSumm.mnuNewSharedTemplateClick┤ │ │ │ 
        TfrmConsults.popNoteMemoTemplateClick┤ │ │ │ 
           TfrmConsults.mnuEditTemplatesClick┤ │ │ │ 
             TfrmConsults.mnuNewTemplateClick┤ │ │ │ 
     TfrmConsults.mnuEditSharedTemplatesClick┤ │ │ │ 
       TfrmConsults.mnuNewSharedTemplateClick┤ │ │ │ 
            TfrmDrawers.mnuEditTemplatesClick┤ │ │ │ 
              TfrmDrawers.mnuNewTemplateClick┤ │ │ │ 
         TfrmSurgery.popNoteMemoTemplateClick┤ │ │ │ 
            TfrmSurgery.mnuEditTemplatesClick┤ │ │ │ 
              TfrmSurgery.mnuNewTemplateClick┤ │ │ │ 
      TfrmSurgery.mnuEditSharedTemplatesClick┤ │ │ │ 
        TfrmSurgery.mnuNewSharedTemplateClick┤ │ │ │ 
           TfrmNotes.popNoteMemoTemplateClick┤ │ │ │ 
              TfrmNotes.mnuEditTemplatesClick┤ │ │ │ 
                TfrmNotes.mnuNewTemplateClick┤ │ │ │ 
        TfrmNotes.mnuEditSharedTemplatesClick┤ │ │ │ 
          TfrmNotes.mnuNewSharedTemplateClick┘ │ │ │ 
                TfrmTemplateEditor.tvTreeChange┤ │ │ 
             TfrmTemplateEditor.cbActiveClick┤ │ │ │ 
               TfrmTemplateEditor.tvTreeEnter┤ │ │ │ 
             TfrmTemplateEditor.cbShHideClick┤ │ │ │ 
           TfrmTemplateEditor.cbActiveClick┘ │ │ │ │ 
            TfrmTemplateEditor.cbPerHideClick┤ │ │ │ 
           TfrmTemplateEditor.cbActiveClick┘ │ │ │ │ 
             TfrmTemplateEditor.sbDeleteClick┤ │ │ │ 
      TfrmTemplateEditor.mnuNodeDeleteClick┤ │ │ │ │ 
           TfrmTemplateEditor.tvTreeKeyDown┘ │ │ │ │ 
                    TfrmTemplateEditor.Resync┤ │ │ │ 
             TfrmTemplateEditor.btnNewClick┤ │ │ │ │ 
                         EditTemplates...┤ │ │ │ │ │ 
       TfrmTemplateEditor.mnuAutoGenClick┤ │ │ │ │ │ 
TfrmTemplateEditor.mnuImportTemplateClick┘ │ │ │ │ │ 
           TfrmTemplateEditor.sbMoveUpClick┤ │ │ │ │ 
         TfrmTemplateEditor.sbMoveDownClick┤ │ │ │ │ 
        TfrmTemplateEditor.sbDeleteClick...┤ │ │ │ │ 
          TfrmTemplateEditor.tvTreeDragDrop┤ │ │ │ │ 
       TfrmTemplateEditor.sbCopyLeftClick┤ │ │ │ │ │ 
      TfrmTemplateEditor.sbCopyRightClick┤ │ │ │ │ │ 
     TfrmTemplateEditor.mnuNodePasteClick┘ │ │ │ │ │ 
            TfrmTemplateEditor.mnuSortClick┤ │ │ │ │ 
          TfrmTemplateEditor.TemplateLocked┘ │ │ │ │ 
            TfrmTemplateEditor.FormCreate┘   │ │ │ │ 
             TfrmTemplateEditor.SharedEditing┤ │ │ │ 
              TfrmTemplateEditor.FormCreate┤ │ │ │ │ 
       TfrmTemplateEditor.cbEditSharedClick┘ │ │ │ │ 
             TfrmTemplateEditor.cbxTypeChange┘ │ │ │ 
                TfrmTemplateEditor.reBoilChange┤ │ │ 
             TfrmTemplateEditor.mnuAutoGenClick┤ │ │ 
      TfrmTemplateEditor.mnuImportTemplateClick┘ │ │ 
                  TfrmTemplateEditor.edtGapChange┘ │ 
                    TfrmTemplateEditor.reBoilChange┘ 

Calls

Name Declaration Comments
TTemplate.DialogProperties function DialogProperties(Parent: TTemplate = nil): string; -
DlgText function DlgText(const txt: string; DlgProps: string): string; -
TTemplate.GetBoilerplate function GetBoilerplate: string; -
TTemplate.ItemBoilerplate function ItemBoilerplate: string; -

Called-By

Name Declaration Comments
TfrmTemplateEditor.DisplayBoilerplate procedure DisplayBoilerplate(Node: TTreeNode); -
TTemplate.GetText function GetText: string; -
TfrmTemplateEditor.reBoilChange procedure reBoilChange(Sender: TObject); -


Source

1854  function TTemplate.FullBoilerplate: string;
1855  var
1856    Itm: string;
1857  begin
1858    Result := GetBoilerplate;
1859    if FIsReminderDialog or FIsCOMObject then exit;
1860    Itm := ItemBoilerplate;
1861    if(Result <> '') and (Itm <> '') and (copy(Result,length(Result)-1,2) <> CRLF) then
1862      Result := Result + CRLF;
1863    Result := DlgText(Result, DialogProperties) + Itm;
1864  end;