Procedure

SetReminderPopupCoverRoutine

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Scope

Interfaced

Declaration

procedure SetReminderPopupCoverRoutine(Menu: TPopupMenu);

Calls Hierarchy


SetReminderPopupCoverRoutine
 └ReminderTreePopupCover
   └ReminderMenuBuilder
     ├Add
     │ ├ReminderClinMaintClicked
     │ │ ├ReportBox
     │ │ │ └CreateReportBox
     │ │ │   └TfrmBase508Form.Create
     │ │ │     ├TfrmBase508Form.UpdateAccessibilityActions
     │ │ │     ├UnfocusableControlEnter
     │ │ │     └AdjustControls
     │ │ │       ├TfrmBase508Form.ModifyUnfocusableControl
     │ │ │       └..(rec)..
     │ │ ├DetailReminder
     │ │ │ └InteractiveRemindersActive
     │ │ │   └GetRemindersActive
     │ │ └ReminderName
     │ │   └TReminderDialog.GetPrintName
     │ ├ReminderEduClicked
     │ │ ├ReportBox...
     │ │ └EducationTopicDetail
     │ ├ReminderInqClicked
     │ │ ├ReportBox...
     │ │ ├ReminderInquiry
     │ │ └ReminderName...
     │ ├ReminderWebClicked
     │ │ ├GotoWebPage
     │ │ └GetWebPageAddress
     │ ├ReminderEvalClicked
     │ │ └EvalReminder
     │ │   ├EvaluateReminder
     │ │   │ └EvaluateReminders
     │ │   ├ReminderEvaluated
     │ │   └ReminderName...
     │ ├ReminderViewFolderClicked
     │ │ ├GetRemFolders
     │ │ │ └GetReminderFolders
     │ │ └SetRemFolders
     │ │   ├BeginReminderUpdate
     │ │   ├SetReminderFolders
     │ │   └EndReminderUpdate
     │ ├GetRemFolders...
     │ └ReminderIconLegendClicked
     │   └ShowIconLegend
     │     ├TfrmBase508Form.Create...
     │     ├TfrmFrame.TabExists
     │     ├TfrmIconLegend.ShowTab
     │     └TfrmIconLegend.SetFontSize
     │       └TfrmIconLegend.SnapLabels
     ├GetEducationTopics
     │ ├GetEducationTopicsForReminder
     │ └GetEducationSubtopics
     ├AddEducationTopics
     │ ├GetEducationTopics...
     │ ├Add...
     │ └..(rec)..
     ├GetWebPages
     │ └GetReminderWebPages
     └AddWebPages
       ├Add...
       └GetWebPageName

Called-By Hierarchy


SetReminderPopupCoverRoutine
     TfrmCover.DisplayPage┘ 
TfrmCover.CoverItemClick┘   

Calls

Name Declaration Comments
ReminderTreePopupCover procedure ReminderTreePopupCover(AData: pointer; Sender: TObject); -

Called-By

Name Declaration Comments
TfrmCover.DisplayPage procedure DisplayPage; override; -


Source

1615  procedure SetReminderPopupCoverRoutine(Menu: TPopupMenu);
1616  var
1617    M: TMethod;
1618  
1619  begin
1620    M.Code := @ReminderTreePopupCover;
1621    M.Data := nil;
1622    Menu.OnPopup := TNotifyEvent(M);
1623  end;