起步软件技术论坛-X3

 找回密码
 立即注册
搜索
12
返回列表 发新帖
楼主: cdz0451

【结帖】能否这样进入工作台?**

[复制链接]
发表于 2008-2-19 17:21:22 | 显示全部楼层
1关闭后会报错.
按下面修改 业务模型\系统空间\系统运行库\系统核心库 中的一个函数,注意修改完后编译、签入、刷新缓存

static procedure TSYSTEMCORE.SetOperator(AOperator: TOperator);
begin
  if not FCanRelogon or (FOperator <> nil) then
    raise Exception.Create('已经登录');

  FOperator := AOperator;

  FSetOperator := True;
  //FCanRelogon := Borland.Delphi.Windows.GetModuleHandle('rtdbg.dll') <> 0;
  FCanRelogon := True;
end;
回复 支持 反对

使用道具 举报

发表于 2008-2-19 17:22:25 | 显示全部楼层
2 我想注销换用户,也会报错.
logon的登陆模式不支持注销,请屏蔽掉主界面上的注销按钮
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-2-20 16:10:59 | 显示全部楼层
哦 好的. 这个帖子结了吧
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-7 01:37 , Processed in 0.041848 second(s), 12 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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