|  | 
 
| 可视没效果,只能把主窗口藏在登入窗口后面,调试的时候正常,编译出来主窗口又弹出来了, 复制代码<火山程序 类型 = "通常" 版本 = 1 />
方法 我的主窗口_创建完毕 <接收事件 类型 = 整数 注释 = "当本组件及其中所有子组件均被创建完毕后发送此事件.">
参数 来源对象 <类型 = 我的主窗口 注释 = "提供事件产生的具体来源对象" 折叠>
参数 标记值 <类型 = 整数 注释 = "用户调用"挂接事件"命令时所提供的"标记值"参数值,非此方式挂接事件则本参数值固定为0.">
{
    变量 用户名 <类型 = 文本型 折叠>
    变量 用户名数组 <类型 = 文本数组类>
    变量 快捷 <类型 = 文本型>
    变量 快捷数组 <类型 = 文本数组类>
    <折叠> 如果 (文件是否存在 (取运行目录 () + "\\name.txt") == 真)
    {
        用户名 = 多字节到文本 (读入文件 (取运行目录 () + "\\name.txt", ))
        分割文本 (用户名, "\n", 用户名数组, , )
        计次循环 (用户名数组.取成员数 ())
        {
            组合框_名称.加入项目 (用户名数组.取成员 (取循环索引 ()), )
        }
        组合框_名称.现行选中项 = 0
        如果 (文件是否存在 (取运行目录 () + "\\kuaijie.txt") == 真)
        {
            快捷 = 多字节到文本 (读入文件 (取运行目录 () + "\\kuaijie.txt", ))
            分割文本 (快捷, "\n", 快捷数组, , )
            计次循环 (快捷数组.取成员数 ())
            {
                组合框_快捷.加入项目 (快捷数组.取成员 (取循环索引 ()), )
            }
        }
    }
    <折叠> 否则
    {
        信息框 ("文件丢失,关闭!", , )
        结束 ()
    }
    选择框_置顶.选中 = 真
    编辑框_号码.获取焦点 ()
    取程序 ().文本朗读.创建 ()
    取程序 ().文本朗读.语速 = 文本到整数 (编辑框_语速.内容)
    模拟按键.键盘单击 (20, )
    登入窗口.创建窗口 (, , , , )
    登入窗口.获取焦点 ()
    返回 (1)
    组合框_港澳.现行选中项 = 0
}
<火山程序 类型 = "通常" 版本 = 1 />
方法 登入窗口_创建完毕 <接收事件 类型 = 整数 注释 = "当本组件及其中所有子组件均被创建完毕后发送此事件.">
参数 来源对象 <类型 = 登入窗口 注释 = "提供事件产生的具体来源对象">
参数 标记值 <类型 = 整数 注释 = "用户调用"挂接事件"命令时所提供的"标记值"参数值,非此方式挂接事件则本参数值固定为0.">
{
    <折叠> 如果 (文件是否存在 (取运行目录 () + "\\GAZHMM.ini") == 假)
    {
        按钮_登入.标题 = "注册"
    }
    否则
    {
        方法_识别 ()
        置为主窗口 ()
        总在最前 = 真
        取程序 ().主窗口对象.禁止 = 真
        取程序 ().主窗口对象.高度 = 高度
        取程序 ().主窗口对象.宽度 = 宽度
        取程序 ().主窗口对象.左边 = 左边
        取程序 ().主窗口对象.顶边 = 顶边
    }
    返回 (0)
}
 
 
 | 
 |