TC4.0的多窗口后台

931889694

空间 多窗口操作
//先打开四个记事本(保证只有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])
辅助.退出()
返回 真
//函数返回语句
功能结束




//点击关闭_执行操作


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

bbq2015

谢谢分享。

政和百兴

学习学习

好心晴

楼主你的代码我运行了下，问题不少，我简单改了下
空间 多窗口操作
//先打开四个记事本(保证只有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])
    辅助.退出()
    返回 真
功能结束

空间结束

laowantong

xx学习学习

Sky_Pro

楼主要操作文件的话TC有文件操作的API，干嘛这么麻烦。。