以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于启动封面  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63569)

--  作者:zhsenchzhi
--  发布时间:2015/1/23 20:43:00
--  关于启动封面
两个问题:

1发布项目时,设置了一个启动封面,后来想把这个启动封面去掉,发现不能去掉,请问这个启动封面一旦设置了,还能去掉吗?

2 在设置了启动封面,同时设置了UKEY,启动时,在 beforeOpenPfoject 事件中,做了判断,如果没有插入Ukey,则 弹出对话框提示,然后退出,可是发布项目后实际运行中,发现,弹出的对话框被启动封面遮住了,导致对话框不能被看到,请问该怎么处理?

实际运行的情况:


图片点击可在新窗口打开查看此主题相关图片如下:12.png
图片点击可在新窗口打开查看

期待出现的情况:


图片点击可在新窗口打开查看此主题相关图片如下:13.png
图片点击可在新窗口打开查看

希望能够做到
1: 发布项目时,可以去掉启动封面
2: 或者可以将错误提示对话框 放在启动封面之上

beforeOpenPfoject 事件 具体代码如下:

If UKey.Start() Then
    If UKey.Encrypt1("123") <> "AB927000" OrElse UKey.Encrypt2("123") <> "tgfghfh686900"  Then
        MessageBox.Show("认证失败, 请插上正确的产品认证证书!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        e.Cancel = True
        Syscmd.Project.Exit
    End If
Else
    MessageBox.Show("欢迎使用正版软件, 请插上产品的认证证书!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
    Syscmd.Project.Exit
End If


--  作者:程兴刚
--  发布时间:2015/1/23 22:30:00
--  

beforeOpenPfoject事件执行时窗口还没有生成,AfterOpenProject事件判断并打开提示窗口!