自动登录问题，急！！！

zxj · 发表于 2010-8-30 01:11:49

想要让某些网段ip的用户直接登录x3系统，即如果符合条件则不弹出登录对话框,直接进入系统。

目前做法是：
在系统登录对话框的oncreate事件中获取ip如果ip符合要求则直接以windows用户名作为x3用户id，密码默认为空，调用Logon函数，但总是无法直接登录系统，还是需要点击一下‘登录系统’按钮，达不到用户要求。该如何处理，急求解决方案！！！

zhangxupeng · 发表于 2010-8-30 10:06:22

在系统登录对话框的ShowLogonForm方法中
把if ShowModal = Business.Forms.Controls.mrOK then这句代码注销掉就可以不显示登录窗体
然后给紧跟着下面的代码里的AName和 APass这两个变量赋值你的ID和密码
这样就可以不出现登录框，直接用你获取的ID和密码登录X3

zxj · 发表于 2010-8-30 23:33:50

非常感谢，问题已经解决！
但不知道TSYSTEMLOGINDIALOG.ShowLogonForm这个函数是在哪儿被调用的？在系统登录对话框中及相关模块都没有找到。
再就是如何能象调试一般功能模块一样对系统登录过程进行调试？

zhangxupeng · 发表于 2010-8-31 09:15:49

就在业务模型\系统空间\简洁风格\界面库\窗体库\系统登录对话框的代码里啊
在系统启动的时候会调用这个函数，你可以直接在这个函数里打上断点来调试

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