private void OnEnableDisableOtherScreenParts(TEnableDisableEventArgs e)
 {
     if (EnableDisableOtherScreenParts != null)
     {
         EnableDisableOtherScreenParts(this, e);
     }
 }
Exemplo n.º 2
0
        private void UcoPartnerTabSet_EnableDisableOtherScreenParts(System.Object sender, TEnableDisableEventArgs e)
        {
            // MessageBox.Show('TFrmPartnerEdit.ucoPartnerTabEnableDisableOtherScreenParts = ' + e.Enable.ToString + ')';
            EnableDisableUpperPart(e.Enable);

// TODO            tbrMain.Enabled = e.Enable;

            if (!e.Enable)
            {
                SetupAvailableModuleDataItems((!e.Enable), FCurrentModuleTabGroup);
                EnableSave(false);
                FPetraUtilsObject.DetailEditMode = true;
            }
            else
            {
                SetupAvailableModuleDataItems(e.Enable, TPartnerEditScreenLogic.TModuleTabGroupEnum.mtgNone);
                EnableSave(FPetraUtilsObject.HasChanges);
                FPetraUtilsObject.DetailEditMode = false;
            }
        }