Procedure

TFormMonitor.ActiveFormChange

Module

uFormMonitor

Last Modified

7/15/2014 3:26:44 PM

Visibility

Public

Owner

TFormMonitor

Declaration

procedure ActiveFormChange(Sender: TObject);

Calls Hierarchy


TFormMonitor.ActiveFormChange
 └TFormMonitor.StartZOrdering
   └TFormMonitor.SystemRunning

Called-By Hierarchy


TFormMonitor.ActiveFormChange
         TFormMonitor.Start┘ 
        SetFormMonitoring┘   
   TfrmFrame.FormCreate┤     
    TfrmFrame.FormClose┘     

Calls

Name Declaration Comments
TFormMonitor.StartZOrdering procedure StartZOrdering; -

Called-By

Name Declaration Comments
TFormMonitor.Start procedure Start; -


Source

229   procedure TFormMonitor.ActiveFormChange(Sender: TObject);
230   begin
231     if(Assigned(FOldActiveFormChangeEvent)) then
232       FOldActiveFormChangeEvent(Sender);
233     StartZOrdering;
234   end;