Procedure

TfrmTemplateEditor.sbCopyRightClick

Module

fTemplateEditor

Last Modified

7/15/2014 3:26:44 PM

Visibility

Public/Published

Owner

TfrmTemplateEditor

Declaration

procedure sbCopyRightClick(Sender: TObject);

Calls Hierarchy


TfrmTemplateEditor.sbCopyRightClick
 └TfrmTemplateEditor.tvTreeDragDrop
   ├TTemplate.GetItems
   │ └ExpandTemplate
   │   ├TTemplate.GetChildren
   │   ├GetTemplateChildren
   │   ├AddTemplate
   │   │ ├TTemplate.Create
   │   │ │ └TTemplate.ReminderDialogIEN
   │   │ └TTemplate.AddChild
   │   │   └TTemplate.GetItems...
   │   └TTemplate.ItemIENs
   │     └TTemplate.GetItems...
   ├TfrmTemplateEditor.AllowMove
   │ ├TfrmTemplateEditor.IsTemplateLocked
   │ │ ├TTemplate.AutoLock
   │ │ │ └TTemplate.LinkType
   │ │ ├TTemplate.IsLocked
   │ │ │ └TTemplate.AutoLock...
   │ │ └..(rec)..
   │ └TTemplate.GetItems...
   ├TfrmTemplateEditor.CanClone
   │ ├GetFirstPersonalNode
   │ │ └..(rec)..
   │ └TTemplate.CanModify
   │   ├TTemplate.ValidID
   │   └LockTemplate
   ├TfrmTemplateEditor.Clone
   │ ├TfrmTemplateEditor.CanClone...
   │ ├..(rec)..
   │ ├TTemplate.CanModify...
   │ ├TTemplate.Clone
   │ │ ├TTemplate.TrueClone
   │ │ │ ├TTemplate.GetChildren
   │ │ │ ├TTemplate.Create...
   │ │ │ ├TTemplate.SetBoilerplate
   │ │ │ │ ├TTemplate.CanModify...
   │ │ │ │ └TTemplate.ValidID
   │ │ │ ├TTemplate.GetBoilerplate
   │ │ │ │ └GetTemplateBoilerplate
   │ │ │ ├TTemplate.SetDescription
   │ │ │ │ ├TTemplate.CanModify...
   │ │ │ │ └TTemplate.ValidID
   │ │ │ └TTemplate.GetDescription
   │ │ │   └LoadTemplateDescription
   │ │ ├TTemplate.GetItems...
   │ │ └TTemplate.BackupItems
   │ │   └TTemplate.ItemIENs...
   │ ├TTemplate.RemoveNode
   │ ├MarkDeleted
   │ │ ├TTemplate.ValidID
   │ │ ├TTemplate.SetFileLink
   │ │ │ └TTemplate.AssignFileLink
   │ │ │   ├TTemplate.CanModify...
   │ │ │   ├TTemplate.ValidID
   │ │ │   ├TTemplate.LinkType
   │ │ │   ├TTemplate.SetReminderDialog
   │ │ │   │ ├TTemplate.CanModify...
   │ │ │   │ ├TTemplate.ValidID
   │ │ │   │ ├TTemplate.ReminderDialogIEN
   │ │ │   │ ├TTemplate.LinkType
   │ │ │   │ └TTemplate.SetFileLink...
   │ │ │   ├TTemplate.GetItems...
   │ │ │   └..(rec)..
   │ │ ├TTemplate.GetItems...
   │ │ └..(rec)..
   │ ├TTemplate.AddNode
   │ ├TTemplate.GetItems...
   │ └TfrmTemplateEditor.ShowTemplateType
   ├TTemplate.CanModify...
   ├TTemplate.SetPersonalOwner
   │ ├TTemplate.CanModify...
   │ ├TTemplate.ValidID
   │ ├TTemplate.GetItems...
   │ └..(rec)..
   └TfrmTemplateEditor.Resync
     ├TdmodShared.Resync
     │ ├InSyncNode
     │ ├GetID
     │ │ └..(rec)..
     │ ├TTemplate.RemoveNode
     │ ├BuildNodes
     │ │ ├TTemplate.AddNode
     │ │ ├TTemplate.GetItems...
     │ │ ├..(rec)..
     │ │ └TTemplate.GetChildren
     │ └GetNode
     │   └GetID...
     ├TfrmTemplateEditor.EnableNavControls
     │ └TfrmTemplateEditor.AllowMove...
     └TfrmTemplateEditor.tvTreeChange
       ├TfrmTemplateEditor.ChangeTree
       ├TfrmTemplateEditor.IsTemplateLocked...
       ├TfrmTemplateEditor.EnableControls
       │ ├TfrmTemplateEditor.UpdateInsertsDialogs
       │ │ ├TfrmTemplateObjects.UpdateStatus
       │ │ └TfrmTemplateFields.UpdateStatus
       │ │   └TfrmTemplateFields.ValidInsert
       │ └TfrmTemplateEditor.EnableNavControls...
       └TfrmTemplateEditor.ShowInfo
         ├TfrmTemplateEditor.ShowTemplateType
         ├TfrmTemplateEditor.GetLinkType
         ├LoadServiceListWithSynonyms
         ├TTemplate.LinkName
         │ ├GetLinkName
         │ │ └ExternalName
         │ ├TTemplate.LinkIEN
         │ └TTemplate.LinkType
         ├TTemplate.LinkIEN
         ├TTemplate.GetDescription...
         ├TTemplate.IsLocked...
         ├TTemplate.AutoLock...
         ├TfrmTemplateEditor.IsTemplateLocked...
         ├TTemplate.GetChildren
         ├TTemplate.ReminderDialogIEN
         ├TdmodShared.InDialog
         │ └TTemplate.IsDialog
         ├TTemplate.GetBoilerplate...
         ├TfrmTemplateEditor.DisplayBoilerplate
         │ ├TfrmTemplateEditor.pnlBoilerplateResize
         │ ├TTemplate.GetBoilerplate...
         │ ├TTemplate.FullBoilerplate
         │ │ ├TTemplate.GetBoilerplate...
         │ │ ├TTemplate.ItemBoilerplate
         │ │ │ ├TTemplate.GetItems...
         │ │ │ ├TTemplate.GetTemplateType
         │ │ │ ├DlgText
         │ │ │ └TTemplate.DialogProperties
         │ │ │   ├TTemplate.GetBoilerplate...
         │ │ │   └TTemplate.DlgID
         │ │ ├DlgText
         │ │ └TTemplate.DialogProperties...
         │ ├TfrmTemplateEditor.UpdateInsertsDialogs...
         │ ├TfrmTemplateEditor.ShowBoilerPlate
         │ └TfrmTemplateEditor.ShowGroupBoilerplate
         ├TfrmTemplateEditor.ShowGroupBoilerplate
         └TfrmTemplateEditor.pnlBoilerplateResize

Calls

Name Declaration Comments
TfrmTemplateEditor.tvTreeDragDrop procedure tvTreeDragDrop(Sender, Source: TObject; X, Y: Integer); -


Source

2086  procedure TfrmTemplateEditor.sbCopyRightClick(Sender: TObject);
2087  begin
2088    if (assigned(tvShared.Selected)) then
2089    begin
2090      if (not assigned(tvPersonal.Selected)) then
2091        tvPersonal.Selected := tvPersonal.Items.GetFirstNode;
2092      FDragNode := tvShared.Selected;
2093      FDropNode := tvPersonal.Selected;
2094      FDropInto := (TTemplate(FDropNode.Data).RealType in AllTemplateFolderTypes);
2095      tvTreeDragDrop(tvShared, tvPersonal, 0, 0);
2096    end;
2097  end;