Procedure

TfrmFrame.AppDeActivated

Module

fFrame

Last Modified

3/11/2015 8:41:44 AM

Comments

Close Treatment Factor hint window if alt-tab pressed.

Visibility

Private

Owner

TfrmFrame

Declaration

procedure AppDeActivated(Sender: TObject);

Called-By Hierarchy


TfrmFrame.AppDeActivated
  TfrmFrame.FormCreate┘ 

Called-By

Name Declaration Comments
TfrmFrame.FormCreate procedure FormCreate(Sender: TObject); -


Source

3348  procedure TfrmFrame.AppDeActivated(Sender: TObject);
3349  begin
3350    if FRVTFhintWindowActive then
3351    begin
3352       FRVTFHintWindow.ReleaseHandle;
3353       FRVTFHintWindowActive := False;
3354    end
3355    else
3356    if FOSTFHintWndActive then
3357    begin
3358       FOSTFhintWindow.ReleaseHandle;
3359       FOSTFHintWndActive := False ;
3360    end;
3361    if FHintWinActive then   // graphing - hints on values
3362    begin
3363      FHintWin.ReleaseHandle;
3364      FHintWinActive := false;
3365    end;
3366  end;