【结帖】OrgComboBox问题**

chunhu52201

如何实现:传入人员ID 或部门ID 或岗位ID ;
                 在OrgComboBox1 里 定位到当前位置?

zfang

试试这样子
procedure TMainForm.Button1Click(Sender: TObject);
var
  lBizURL : TBizURL;
begin
  lBizURL := TBizURL.Create;
  lBizURL.URL := 'Org:\ROOT\JG1.OGN\BM1.DPT\GW1.PTM\RY1.psm';
  OrgComboBox1.BizTreeView.SelectedNode :=
    OrgComboBox1.BizTreeView.BizTree.FindNodeByBizURL(lBizURL);
  lBizURL.Free;
end;

chunhu52201

OK 结帖 很满意

zfang

好，客气。谢谢反馈。