TC官方合作论坛

标题: TC4.0的多窗口后台 [打印本页]

作者: 931889694 时间: 2013-3-28 20:17
标题: TC4.0的多窗口后台
空间多窗口操作
//先打开四个记事本(保证只有4个记事本窗口,不能多也不能少),不要最小化,运行脚本以后点击开始按钮
线程句柄集=array[4]//定义全局数组维数
窗口句柄
功能枚举窗口()
输入框句柄
字符句柄=系统.枚举("Notepad",1)//通过类名枚举记事本主窗口句柄
字符句柄集,输入框句柄集
分隔符="|"
是否成功=字符串.分割(字符句柄,分隔符,字符句柄集)//分割枚举到的窗口句柄集
整型 c1
数组空间.大小(字符句柄集,c1)
//重复(4)
遍历(i=0;i<4;i++)
      窗口句柄 = 类型.转整型(字符句柄集,0)//把分割好的窗口句柄集转换为整型
      窗口.设置大小(窗口句柄,500,300)//设置记事本窗口大小
      选择(i)
         条件 0:
         窗口.设置位置(窗口句柄,0,0)//设置记事本窗口位置,第一个
         条件 1:
         窗口.设置位置(窗口句柄,500,0)//设置记事本窗口位置,第二个
         条件 2:
         窗口.设置位置(窗口句柄,0,300)//设置记事本窗口位置,第三个
         条件 3:
         窗口.设置位置(窗口句柄,500,300)//设置记事本窗口位置,第四个
      选择结束
      输入框句柄 = 系统.枚举(字符句柄集,3)//枚举记事本的输入界面子窗口句柄
      字符串.分割(输入框句柄,分隔符,输入框句柄集)//分割记事本输入界面子窗口句柄,(大家可以输出看一下,枚举到的子窗口句柄最少有两个,只有第一个是有效的,其他的是无效的)
      线程句柄集 = 线程.开启("多窗口操作.发送内容",输入框句柄集[0])//开启子线程,把分割出来的记事本子窗口句柄(第一个,有效的)传入线程内
遍历结束
//重复结束
返回 0
功能结束

功能发送内容(句柄)
内容="我晕！！！！\r大师用的是老的TC要改变好多\r我终于磕磕碰碰做出来了\r"
循环(真)
      窗口.发送字符串(类型.转整型(句柄),内容)
      辅助.等待(1000)
循环结束
返回 0
功能结束

功能开始_点击()
多窗口操作.枚举窗口()
返回真
功能结束

功能退出_点击()
线程.关闭(线程句柄集[0])
线程.关闭(线程句柄集[1])
线程.关闭(线程句柄集[2])
线程.关闭(线程句柄集[3])
辅助.退出()
返回真
//函数返回语句
功能结束

//点击关闭_执行操作

空间结束
//空间结束语句

作者: Sky_Pro 时间: 2013-3-28 22:21
楼主要操作文件的话TC有文件操作的API，干嘛这么麻烦。。
作者: laowantong 时间: 2013-3-29 07:35
xx学习学习
作者: 好心晴 时间: 2014-1-9 18:36
楼主你的代码我运行了下，问题不少，我简单改了下
空间多窗口操作
//先打开四个记事本(保证只有4个记事本窗口,不能多也不能少),不要最小化,运行脚本以后点击开始按钮
线程句柄集=array[4]//定义全局数组维数

功能枚举窗口()
输入框句柄
字符句柄=系统.枚举("Notepad",1)//通过类名枚举记事本主窗口句柄
字符句柄集,输入框句柄集
分隔符="|"
是否成功=字符串.分割(字符句柄,分隔符,字符句柄集)//分割枚举到的窗口句柄集
整型 c1
数组空间.大小(字符句柄集,c1)//获取字符句柄集数组的大小
//重复(4)
遍历(i=0;i<4;i++)
      窗口.设置大小(字符句柄集[i],500,300)//设置记事本窗口大小
      选择(i)
         条件 0:
         窗口.设置位置(字符句柄集[i],0,0)//设置记事本窗口位置,第一个
         条件 1:
         窗口.设置位置(字符句柄集[i],500,0)//设置记事本窗口位置,第二个
         条件 2:
         窗口.设置位置(字符句柄集[i],0,300)//设置记事本窗口位置,第三个
         条件 3:
         窗口.设置位置(字符句柄集[i],500,300)//设置记事本窗口位置,第四个
      选择结束
      输入框句柄 = 系统.枚举(字符句柄集[i],3)//枚举记事本的输入界面子窗口句柄
      字符串.分割(输入框句柄,分隔符,输入框句柄集)//分割记事本输入界面子窗口句柄,(大家可以输出看一下,枚举到的子窗口句柄最少有两个,只有第一个是有效的,其他的是无效的)
      线程句柄集[i] = 线程.开启("多窗口操作.发送内容",输入框句柄集[0])//开启子线程,把分割出来的记事本子窗口句柄(第一个,有效的)传入线程内
遍历结束

返回 0
功能结束

功能发送内容(句柄)
内容="我晕！！！！\r大师用的是老的TC要改变好多\r我终于磕磕碰碰做出来了\r"
循环(真)
      窗口.发送字符串(类型.转整型(句柄),内容)
      辅助.等待(1000)
循环结束
返回 0
功能结束

功能开始_点击()
多窗口操作.枚举窗口()
返回真
功能结束

功能退出_点击()
线程.关闭(线程句柄集[0])
线程.关闭(线程句柄集[1])
线程.关闭(线程句柄集[2])
线程.关闭(线程句柄集[3])
辅助.退出()
返回真
功能结束

空间结束

作者: 政和百兴 时间: 2014-1-14 23:35
学习学习
作者: bbq2015 时间: 2015-1-26 16:34
谢谢分享。

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