【搞定】如何去掉打开功能弹出的任务和计划

thb425

第一次打开功能的的时候，总是是弹出如图上的窗口

alang

这个窗体是业务关联用到的，缺省不是浮动的，是贴在界面的右边上的，你退出系统，删除Business.user.xml文件，在试试

thb425

可以了，能否把右边的业务关联去掉。

alang

在 系统空间\简洁风格\界面库\窗体库\标准风格主窗体 中
注视掉一句代码
procedure TSTANDARDSTYLEMAINFORM.AddBars;
begin
{  DockStub.AddClient('FuncNavBar', FFuncNavBar, nil);
     [FFuncNavBar], TDockKind.dkAutoHide, TDockSide.alLeft);
     [OrgTreeView], TDockKind.dkAutoHide, TDockSide.alLeft);}
//  DockStub.AddClient('RelevancyNavBar', FRelevancyNavBar, nil);    注释掉这句话
  DockStub.AddClient('DocRelevancyNavBar', FDocRelevancyNavBar, nil);
  // TODO: 修改记录目前不显示
  DockStub.AddClient('EditLogNavBar', FEditLogNavBar, nil);
end;

thb425

在主界面不在显示，打开功能的时候又显示出来了。

alang

procedure TSTANDARDSTYLEMAINFORM.ReloadRelevancyNavBar;
var
  lRelevancyViewNavBar: TRelevancyViewNavBar;
  lRefreshRelevanciesMessage: TRefreshRelevanciesMessage;
  lReloadRelevanciesMessage: TReloadRelevanciesMessage;
begin
  HideRelevancyNavBar;
  Exit;  //增加这句


procedure TSTANDARDSTYLEMAINFORM.ShowRelevancyNavBar;
begin
  Exit; //增加这句话

thb425

谢谢，弄好了，结贴