起步软件技术论坛-X3

 找回密码
 立即注册
搜索
123
返回列表 发新帖
楼主: 巧克力味

【结贴】同时可以打开两个邮件,而且关闭也会报错,**

[复制链接]
 楼主| 发表于 2008-11-17 09:13:19 | 显示全部楼层
原来是理解错我的意思了,不是邮件弹出的窗体没在上面,而是用即时通打开邮件后,激活的功能是工作台,不是邮件,再看七楼图!
回复 支持 反对

使用道具 举报

发表于 2008-11-17 09:21:59 | 显示全部楼层
楼主,我远程找你,留下你的qq
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-11-17 09:32:36 | 显示全部楼层
86574216
回复 支持 反对

使用道具 举报

发表于 2008-11-17 10:48:02 | 显示全部楼层
经过远程,应该是问题没有描述清楚。
通过messager直接运行客户端和邮件的时候,默认激活为工作台,需要修改:
业务模型\系统空间\简洁风格\界面库\窗体库\标准风格主窗体
procedure TSTANDARDSTYLEMAINFORM.RunFirstFuncTimerTimer(Sender: TObject);
begin
  RunFirstFuncTimer.Enabled := False;
  if FConfig.ActiveFunc <> '' then
    //RunFunc(FConfig.ActiveFunc, False)
  else
  begin
    //修改这里
    if (FFuncContainers.Count > 0) and (FFuncContainers.Count = 3) then
      ShowContainer(FFuncContainers[2] as TFuncContainer)
    else
      ShowContainer(FFuncContainers[0] as TFuncContainer);
    //原来的代码
    {if FFuncContainers.Count > 0 then
      ShowContainer(FFuncContainers[0] as TFuncContainer);}
  end;
  TransferUtils.TransferManager.Start;
// TODO:  FTransferStatusThread.Resume;

  ConfigChange; // 功能运行后通知,让全局功能能够得到通知
end;

注意:我这里默认运行的功能只有工作台和日程。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-11-18 10:08:51 | 显示全部楼层
OK了,谢谢!
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-27 07:34 , Processed in 0.036921 second(s), 13 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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