Procedure

TfrmRemCoverSheet.cbxServiceChange

Module

fRemCoverSheet

Last Modified

7/15/2014 3:26:38 PM

Visibility

Public/Published

Owner

TfrmRemCoverSheet

Declaration

procedure cbxServiceChange(Sender: TObject);

Calls Hierarchy


TfrmRemCoverSheet.cbxServiceChange
 └TfrmRemCoverSheet.cbxDropDownClose
   ├TfrmRemCoverSheet.UpdateView
   │ └TfrmRemCoverSheet.GetCurrent
   │   └TfrmRemCoverSheet.GetCoverSheetLvlData
   │     └GetCoverSheetLevelData
   └TfrmRemCoverSheet.cbEditLevelClick
     ├TfrmRemCoverSheet.GetExternalName
     │ └GetNameFromList
     │   └ExternalName
     ├TfrmRemCoverSheet.SetButtonHints
     ├TfrmRemCoverSheet.UpdateView...
     └TfrmRemCoverSheet.UpdateMasterListView
       ├TfrmRemCoverSheet.GetCurrent...
       └TfrmRemCoverSheet.UpdateButtons
         ├TfrmRemCoverSheet.GetCurrent...
         ├TfrmRemCoverSheet.GetIndex
         └TfrmRemCoverSheet.LockButtonUpdate
           ├TfrmRemCoverSheet.btnLockClick
           │ └TfrmRemCoverSheet.ChangeStatus
           │   ├TfrmRemCoverSheet.GetCurrent...
           │   ├TfrmRemCoverSheet.GetIndex
           │   ├TfrmRemCoverSheet.MarkListAsChanged
           │   │ └TfrmRemCoverSheet.UpdateView...
           │   ├TfrmRemCoverSheet.SetupItem
           │   └TfrmRemCoverSheet.LockButtonUpdate...
           └TfrmRemCoverSheet.btnAddClick
             └TfrmRemCoverSheet.ChangeStatus...

Calls

Name Declaration Comments
TfrmRemCoverSheet.cbxDropDownClose procedure cbxDropDownClose(Sender: TObject); -


Source

663   procedure TfrmRemCoverSheet.cbxServiceChange(Sender: TObject);
664   begin
665     FCurSer := cbxService.ItemIEN;
666     If FCurSer < 1  then   //No value in Service combobox
667     begin
668       sbCopyLeft.Enabled := false;
669       sbCopyRight.Enabled := false;
670       FSelection := false;
671     end
672     else
673       FSelection := true;
674     FUpdatePending := cbService;
675     if not cbxService.DroppedDown then
676       cbxDropDownClose(nil);
677   end;