Function

TfrmdlgProb.OkToQuit

Module

fProbEdt

Last Modified

7/15/2014 3:26:38 PM

Visibility

Private

Owner

TfrmdlgProb

Declaration

function  OkToQuit:boolean;

Called-By Hierarchy


                             TfrmdlgProb.OkToQuit
                        TfrmdlgProb.bbQuitClick┘ 
              TfrmProblems.AllowContextChange┘   
            TfrmFrame.AllowContextChangeAll┘     
                 TfrmFrame.FormCloseQuery┤       
               TfrmFrame.mnuFileNextClick┤       
             TfrmFrame.mnuFileOpenClick┤ │       
                 TfrmFrame.UMInitiate┤ │ │       
        TfrmFrame.mnuFileNextClick...┤ │ │       
        TfrmFrame.mnuFileRefreshClick┤ │ │       
        TfrmOrders.CheckOrderStatus┤ │ │ │       
    TfrmOrders.mnuActChgEvntClick┤ │ │ │ │       
       TfrmOrders.mnuActHoldClick┤ │ │ │ │       
     TfrmOrders.mnuActUnholdClick┤ │ │ │ │       
      TfrmOrders.mnuActRenewClick┤ │ │ │ │       
     TfrmOrders.mnuActChangeClick┤ │ │ │ │       
       TfrmOrders.mnuActCopyClick┘ │ │ │ │       
             TfrmMeds.mnuActDCClick┤ │ │ │       
            TfrmMeds.CheckMedStatus┘ │ │ │       
         TfrmMeds.mnuActHoldClick┤   │ │ │       
        TfrmMeds.mnuActRenewClick┤   │ │ │       
       TfrmMeds.mnuActUnholdClick┤   │ │ │       
       TfrmMeds.mnuActChangeClick┤   │ │ │       
         TfrmMeds.mnuActCopyClick┤   │ │ │       
       TfrmMeds.mnuActRefillClick┘   │ │ │       
                   TfrmFrame.ViewInfo┘ │ │       
                TfrmDCSumm.ViewInfo┤   │ │       
              TfrmConsults.ViewInfo┤   │ │       
      TfrmFrame.pnlRemindersMouseUp┤   │ │       
       TfrmFrame.RemindersChanged┘ │   │ │       
           TfrmFrame.FormCreate┘   │   │ │       
             TfrmFrame.pnlCIRNClick┤   │ │       
       TfrmFrame.pnlVistaWebClick┤ │   │ │       
            TfrmFrame.FormKeyDown┘ │   │ │       
          TfrmFrame.pnlPatientClick┤   │ │       
            TfrmFrame.pnlVisitClick┤   │ │       
      TfrmFrame.pnlPrimaryCareClick┤   │ │       
        TfrmFrame.pnlRemindersClick┤   │ │       
         TfrmFrame.pnlPostingsClick┤   │ │       
             TfrmFrame.pnlFlagClick┤   │ │       
               TfrmFrame.laMHVClick┤   │ │       
              TfrmFrame.laVAA2Click┤   │ │       
                TfrmOrders.ViewInfo┤   │ │       
                  TfrmMeds.ViewInfo┤   │ │       
               TfrmSurgery.ViewInfo┤   │ │       
                 TfrmNotes.ViewInfo┤   │ │       
              TfrmProblems.ViewInfo┘   │ │       
      TfrmFrame.mnuFileNotifRemoveClick┤ │       
              TfrmFrame.NextButtonClick┘ │       
            TfrmFrame.SetUpNextButton┘   │       
      TfrmFrame.mnuFileOpenClick...┤     │       
               TfrmFrame.FormResize┘     │       
             TfrmFrame.ChangeFont┘       │       
     TfrmFrame.LoadSizesForUser┤         │       
TfrmFrame.LoadUserPreferences┘ │         │       
       TfrmFrame.UMInitiate┘   │         │       
     TfrmFrame.mnuFontSizeClick┘         │       
            TfrmFrame.mnuFileOpenClick...┤       
            TfrmFrame.ctxContextorPending┤       
           TfrmFrame.StartCCOWContextor┘ │       
                 TfrmFrame.FormCreate┘   │       
          TfrmFrame.ctxContextorCommitted┤       
        TfrmFrame.StartCCOWContextor...┘ │       
   TfrmFrame.mnuFileResumeContextGetClick┤       
   TfrmFrame.mnuFileResumeContextSetClick┘       

Called-By

Name Declaration Comments
TfrmdlgProb.bbQuitClick procedure bbQuitClick(Sender: TObject); -


Source

156   function TfrmdlgProb.OkToQuit:boolean;
157   begin
158     Result := not fChanged;
159   end;