起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 1679|回复: 1

已知部门ID,获取部门显示名称的方法

[复制链接]
发表于 2005-6-15 16:49:13 | 显示全部楼层 |阅读模式
代码参考如下:

var
  lDept: Business.Model.Org.Torgunit;
begin
   lDept :=Business.Model.Org.OrgSys.OrgSystem.FindUnit('BM1','','');
   if lDept = nil then
      Dialogs.ShowMessage('没有ID为BM1的部门')
    else
    begin
        Dialogs.ShowMessage(lDept.DisplayName)
        Dialogs.ShowMessage(lDept.BizURL.URL);
    end;
end;
回复

使用道具 举报

 楼主| 发表于 2008-8-19 10:37:00 | 显示全部楼层

已知一个对象的 BizURL ,可以通过BizSys.BizSystem.URLExists 来判断是否存在这个对

例如,已知一个部门的 BizURL ,可以通过BizSys.BizSystem.URLExists 获知该部门是否存在,参考代码如下:

if BizSys.BizSystem.URLExists('Org:\ROOT\JG1.OGN\BM2.dpt') then
   Dialogs.ShowMessage(lDept.DisplayName)
else
   Dialogs.ShowMessage('不存在');
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2024-3-29 18:27 , Processed in 0.039427 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表