【结】在注销时候获取退出时间。**

op+ · 发表于 2008-6-2 11:23:49

我在标准风格主窗体中实现了获取登陆时间等。在系统初始化中获取平台退出时间。但是在注销时候我怎么都不能获取退出时间啊。。。。不是在标准风格主窗体中的
procedure TSTANDARDSTYLEMAINFORM.actFileLogoutExecute(Sender: TObject);
var
  lNewMainForm: TForm;
  dsMySet:TSQLdataset;
begin
  if jsDialogs.ConfirmBox('确定要注销吗?', '注销', 1) then
  begin

FClosing := True;

try
...............................
下写么？？？

Akon · 发表于 2008-6-2 11:56:30

楼主,你在贴出的里面添加注销时间无效吗?

atiger · 发表于 2008-6-2 11:57:01

这样的东东，楼主设置断点跟踪一下就知道了。

对，就是在这个事件上写

op+ · 发表于 2008-6-2 12:23:18

哦。那我断点跟踪一下。

atiger · 发表于 2008-6-2 13:31:22

恩，回头别忘记把结果帖出来哦

op+ · 发表于 2008-6-2 16:44:07

查点忘记回T了。.
原因是在获取登陆时间时候释放了资源。。所以在注销那里取不到退出时间。
还要注意的是在系统初始化那里获取退出时间的问题。要记得在标准风格主窗体CLOSE事件中释放。

结T。谢谢。

atiger · 发表于 2008-6-2 16:45:57

呵呵，
好，谢谢反馈，并共享方法，结贴

		自动登录	找回密码
密码			立即注册