Procedure

TfrmDrawers.FormCreate

Module

fDrawers

Last Modified

7/15/2014 3:26:36 PM

Visibility

Public/Published

Owner

TfrmDrawers

Declaration

procedure FormCreate(Sender: TObject);

Calls Hierarchy


TfrmDrawers.FormCreate
 └TdmodShared.AddDrawerTree
   └TdmodShared.EncounterLocationChanged
     └TfrmDrawers.UpdatePersonalTemplates
       ├UserTemplateAccessLevel
       │ ├GetTemplateRoots
       │ └GetTemplateAccess
       ├TTemplate.GetChildren
       ├TfrmDrawers.AddTemplateNode
       │ └TdmodShared.AddTemplateNode
       │   ├AddChildObject
       │   │ └TTemplate.AddNode
       │   └TTemplate.GetChildren
       └FindNode

Calls

Name Declaration Comments
TdmodShared.AddDrawerTree procedure AddDrawerTree(DrawerForm: TForm); -


Source

1100  procedure TfrmDrawers.FormCreate(Sender: TObject);
1101  begin
1102    dmodShared.AddDrawerTree(Self);
1103    FHasPersonalTemplates := FALSE;
1104  end;