【结贴】代理者的信息**

tyl123

如果是途中这种情况，A去代理B


怎样取到代理者的信息？？？

atiger

不知道楼主想做啥呢？
A代理了B，是想在A登陆后取到B的信息，还是在B中取到A的信息呢？
具体想取到啥信息呢？

tyl123

B是被代理的，进不去，要用A的岗位进去之后获取B的信息

tyl123

···

tyl123

········

atiger

具体想取到啥信息呢？

tyl123

名字、id、岗位、部门 等等啦

atiger

稍等，机器出了点问题，有结果马上跟贴反馈

lixy

uses  添加SystemCore
项目引用系统核心库
....
var
i:integer;
begin

  for i := 0 to TSystemCore.Operator.PositionCount - 1 do
  begin
    if TSystemCore.Operator.ID<> TSystemCore.Operator.Positions.PersonID then
    begin
      edit1.Text:= TSystemCore.Operator.Positions.PositionID+'|'+ TSystemCore.Operator.Positions.PersonID;
    end;
  end;

tyl123

谢谢