【结】确定主界面上Panel的行数的代码是？**

巧克力味

协同常量库:
static function TRTLConsts.DesktopColumnCount: Integer;
begin
  Result := 3;
end;
是确定主界面上Panel的列数是3列.
但确定主界面上Panel的行数的代码是?

我看了一些修改工作台的贴子,但是就是找不出,主界面上Panel的行数是怎么确定的?

巧克力味

我把代码修改成:
static function TRTLConsts.DesktopColumnCount: Integer;
begin
  Result := 4;
end;

static function TRTLConsts.DefaultDesktopPanelDesc: TDesktopPanelDescArray;
const
  cTaskFuncURL = 'Biz:COLLABORATIONMyTaskFunc.Func';
  cPlanFuncURL = 'Biz:COLLABORATIONPlanCenterFunc.Func';
  cCustomerFuncURL = 'Biz:OPERATIONCRMSPACECustomerMngFunc.Func';
  cNeedProcessDocURL = 'Biz:COLLABORATIONTaskCenterInfo.InfoNeedProcessNav.FormDoc';
  cPlanDocURL = 'Biz:COLLABORATIONPlanCenterInfo.InfoPlanNav.FormDoc';
  cPostDocURL = 'Biz:COLLABORATIONTaskCenterInfo.InfoPostNav.FormDoc';
  cCustomerDocURL = 'Biz:OPERATIONCRMSPACECustomerInfo.InfoCustomerNav.FormDoc';
begin
  Result := [CreateDesktopPanel('待办任务', cNeedProcessDocURL, cTaskFuncURL, SysUtils.Format('-f%s -vvmTaskGrid -d待办', [TRTLConsts.NeedProcessTaskTypeStr])),
             CreateDesktopPanel('当前计划', cPlanDocURL, cPlanFuncURL, '-p'),
             CreateDesktopPanel('提交任务', cPostDocURL, cTaskFuncURL, SysUtils.Format('-vvmTaskGrid -f%s -d交办', [TRTLConsts.PostTaskTypeStr])),
             CreateDesktopPanel('我的客户', cCustomerDocURL, cCustomerFuncURL, '')
             ];
end;

static function TRTLConsts.DesktopUnionRect: TRectArray;
begin
  Result := [Classes.Rect(0, 0, 3, 1), Classes.Rect(0, 1, 3, 2), Classes.Rect(0, 2, 3, 3),Classes.Rect(0, 3, 3, 4)];
end;

他工作台显示是这样的!如图:好像行数只有一行!

atiger

好像没有行，直接通过坐标来实现多少行就可以了，http://bbs.justep.com/forum.php?mod=viewthread&tid=18770  3楼的坐标图

巧克力味

static function TRTLConsts.DesktopUnionRect: TRectArray;
begin
  Result := [Classes.Rect(0, 0, 3, 1), Classes.Rect(0, 1, 3, 2), Classes.Rect(0, 2, 3, 3),Classes.Rect(0, 3, 3, 4)];
end;
坐标我写了有行了,行数是四行!但是它就是排下来,哪里写错了!

巧克力味

得了,按照 http://bbs.justep.com/forum.php?mod=viewthread&tid=18770    六楼的代码,但为什么多增加几个 CreateDesktopPanel('空', cNeedProcessDocURL, '', ''),  就得了,这个我自己去看吧,先结贴吧,有问题我再问!

atiger

好吧。

那 http://bbs.justep.com/forum.php?mod=viewthread&tid=23864  这个帖子ok了吗？如果ok，我就结了

巧克力味

那贴也已经OK了,我已经回那贴了!

atiger

好，谢谢反馈