[结]主界面面板怎么修改？[问题]**

atiger

你这样，看一下这个资源是哪个，这个对象没有修改过吧，如果是，先 签入这个对象，，然后 直接用初始化包，即 XXX\\X3 Server\bin\SysInitPkg.brp 这里，，仅仅 导入这一个对象，然后编译

atiger

36楼右边的关联颜色，参考 http://bbs.justep.com/forum.php?mod=viewthread&tid=18303  3楼

新来小职员

最初由 atiger 发布
[B]你这样，看一下这个资源是哪个，这个对象没有修改过吧，如果是，先 签入这个对象，，然后 直接用初始化包，即 XXX\\X3 Ser..

以下省略...... [/B]

以增量方式导入了，还是编译不过。
别的服务器上的公共组件库也编译不过，是初始化时就这样的。

新来小职员

36楼右边的关联颜色，参考 http://bbs.justep.com/forum.php?mod=viewthread&tid=18303  3楼
那段代码是在什么位置？业务关联库是打不开的，应该是写在别的地方吧？

alang

最初由 新来小职员 发布
[B][QUOTE]最初由 atiger 发布
[B]你这样，看一下这个资源是哪个，这个对象没有修改过吧，如果是，先 签入这个对象，，然后[/..

以下省略...... [/B]

编译不过的哪句，改成
lIndex48 := lIndex16;

新来小职员

function TOperatorFuncNavBar.CreateTreeView(AGroup: TdxNavBarGroup;
  const AFromGUID: string): TBaseTreeView;
begin
  Result := inherited CreateTreeView(AGroup, AFromGUID);
  Result.Color := $D1D1D1;
end;
这段代码是改树形面板的背景色的吧？
我把代码lIndex48 := ImageList48.Add(lBitmap48, nil); 改成lIndex16 := ImageList16.Add(lBitmap48, nil); 后编译是通过了但是颜色还是没变。

alang

那个是2611版本的改法，现在的版本是
修改 系统空间\简洁风格\界面库\窗体库\标准风格主窗体
修改这里
  FFuncNavBar.DefaultStyles.Background.BackColor := Graphics.clRed;//15855854;
  FFuncNavBar.DefaultStyles.Background.BackColor2 := Graphics.clRed;//15855854;

比如上边是改成了红色

新来小职员

表达有误，其实我是想改蓝色部分（展开时的背景色）

alang

打开 系统空间\用户界面基础\界面库\组件库
function TOperatorFuncNavBar.CreateTreeView(AGroup: TdxNavBarGroup;
  const AFromGUID: string): TBaseTreeView;
begin
  Result := inherited CreateTreeView(AGroup, AFromGUID);
  Result.Color := Graphics.clBlue;
end;

新来小职员

你给的代码就是46楼我贴的那段啊，出现的问题就是46说的那样，修改完编译不过的代码结果颜色还是没变。
function TOperatorFuncNavBar.CreateTreeView(AGroup: TdxNavBarGroup;
  const AFromGUID: string): TBaseTreeView;
begin
  Result := inherited CreateTreeView(AGroup, AFromGUID);
  Result.Color := graphics.clYellow;
end;
我改成了黄色保存、编译、签入、刷新结果还是没变