Procedure

TfrmDiagnoses.btnRemoveClick

Module

fDiagnoses

Last Modified

3/11/2015 8:41:48 AM

Visibility

Public/Published

Owner

TfrmDiagnoses

Declaration

procedure btnRemoveClick(Sender: TObject);

Calls Hierarchy


TfrmDiagnoses.btnRemoveClick
 ├TfrmPCEBaseMain.Sync2Grid
 │ └TfrmPCEBaseMain.GetCat
 └TfrmDiagnoses.EnsurePrimaryDiag
   ├TfrmPCEBaseGrid.SetGridIndex
   │ └TfrmPCEBaseGrid.UpdateControls
   └TfrmPCEBaseMain.GridChanged
     ├TfrmPCEBaseMain.BeginUpdate
     ├TfrmPCEBaseGrid.SaveGridSelected
     ├TPCEItem.ItemStr
     ├TfrmPCEBaseGrid.RestoreGridSelected
     ├TfrmPCEBaseGrid.SyncGridData
     │ ├TfrmPCEBaseGrid.SaveGridSelected
     │ ├TfrmPCEBaseGrid.RestoreGridSelected
     │ └TfrmPCEBaseGrid.SyncGridHeader
     ├TfrmPCEBaseMain.EndUpdate
     └TfrmPCEBaseMain.UpdateControls
       ├TfrmPCEBaseMain.NotUpdating
       ├TfrmPCEBaseMain.BeginUpdate
       ├TfrmPCEBaseGrid.GetGridIndex
       └TfrmPCEBaseMain.EndUpdate

Calls

Name Declaration Comments
TfrmDiagnoses.EnsurePrimaryDiag procedure EnsurePrimaryDiag; -
TfrmPCEBaseMain.Sync2Grid procedure Sync2Grid; -


Source

197   procedure TfrmDiagnoses.btnRemoveClick(Sender: TObject);
198   begin
199     inherited;
200     Sync2Grid;
201     EnsurePrimaryDiag;
202   end;