TC官方合作论坛

标题: TC 好像不能通过键盘命令 关掉自己的消息框 [打印本页]
作者: pop_tiger    时间: 2016-10-17 12:51
标题: TC 好像不能通过键盘命令 关掉自己的消息框
如题，代码如下：功能 测试()
    消息框("登录成功","提示")
    等待(1000)
    键盘按键(13)
    退出()

结束

作者: cjxdn    时间: 2016-10-17 13:28
功能 关闭消息框()
    等待(3000)//线程开启等待3秒后寻找消息框标题
    变量 窗口句柄=窗口查找("消息框标题")
    调试输出(窗口句柄)
    如果(窗口句柄!=0)//窗口句柄不等于0,就是找到窗口,进行关闭窗口
        窗口关闭(窗口句柄)
    结束
结束
功能 按钮0_点击()
    线程开启("关闭消息框","")//先开启线程等待消息框出现
    消息框("消息框内容","消息框标题")//弹出消息框
结束
作者: xiong5523    时间: 2016-10-17 14:05
因为 消息框("登录成功","提示") 这一句 不点消息框上面的确定 就不会执行下面的步骤
怎么解决我也不知道
作者: winbei2010    时间: 2016-10-17 14:27
自己绘制个界面mes ，用的时候

function msgbox2(hd,text)
    var hwnd=controlopenwindow("mes",true)
    staticsettext("static45",text,"mes")
    windowactivate(hwnd)
end
作者: cjxdn    时间: 2016-10-17 14:42
xiong5523 发表于 2016-10-17 14:05
因为 消息框("登录成功","提示") 这一句 不点消息框上面的确定 就不会执行下面的步骤
怎么解决我也不知道:~ ...

解决办法就是你楼下的方法
自己新建1个子界面
当做消息框
作者: mycodeis0000    时间: 2016-10-17 15:44
  1. 功能 测试_点击()
  2.     //这里添加你要执行的代码
  3.    
  4.    
  5.     var 线程句柄=线程开启("窗口关闭测试","")
  6.    
  7.     消息框("测试窗口关闭")
  8.    
  9.     线程关闭(线程句柄)

  11. 结束

  13. 功能 窗口关闭测试()
  14.    
  15.     循环(真)
  16.         
  17.         等待(2000)
  18.         
  19.         var hwnd1=窗口查找("TC")                //根据标题查找
  20.         
  21.         如果(hwnd1>0)
  22.             
  23.             窗口关闭(hwnd1)
  24.             跳出
  25.             
  26.         结束
  27.         
  28.     结束

  30. 结束
复制代码


直接把代码粘贴上去，调试下就知道了
作者: mycodeis0000    时间: 2016-10-17 16:05
  1. 功能 测试_点击()
  2.     //这里添加你要执行的代码
  3.     var 线程句柄=线程开启("窗口关闭测试","")
  4.    
  5.     消息框("测试窗口关闭")
  6.    
  7.     线程关闭(线程句柄)

  9. 结束

  11. 功能 窗口关闭测试()
  12.     循环(真)
  13.         
  14.         等待(2000)
  15.         
  16.         var hwnd1=窗口查找("TC")                //根据标题查找
  17.         
  18.         如果(hwnd1>0)
  19.             
  20.             窗口关闭(hwnd1)
  21.             
  22.             跳出
  23.             
  24.         结束
  25.         
  26.     结束

  28. 结束
复制代码


复制代码调试下
作者: pop_tiger    时间: 2016-10-17 16:07
谢谢回复！测试可行。
作者: pop_tiger    时间: 2016-10-17 16:16
mycodeis0000 发表于 2016-10-17 16:05
复制代码调试下


谢谢回复！测试可行。



欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1