TC官方合作论坛

标题: 代码问题 [打印本页]

作者: a1041946110 时间: 2012-12-29 18:33
标题: 代码问题
空间线程操作
整型线程句柄
逻辑型是否暂停

//线程执行方法
功能整型线程方法() //这里接收线程开启时传入的参数
//循环(真)
//辅助.消息框("这个是一个线程执行方法 ")
//辅助.等待(100)
//循环结束
字符型返回值=系统.枚举("Edit",1)//类名枚举
字符型[] 字符句柄集=字符型[1] //需要先初始化一次
逻辑型是否成功=字符串.分割(返回值,"|",字符句柄集)
整型 c1  , i = 0
数组.大小(字符句柄集,c1)
循环(i<c1)
线程操作.向窗口发送内容(字符句柄集[1])
  i = i + 1
循环结束
返回 0
功能结束
功能整型向窗口发送内容(字符型字符句柄)
字符型返回值=系统.枚举("l字符句柄",3) //父窗口枚举子窗口
字符型[] 字符句柄集=字符型[1]//需要先初始化一次
逻辑型是否成功=字符串.分割(返回值,"|",字符句柄集)
整型 c1,i=0,句柄
数组.大小(字符句柄集,c1)
循环(i<c1)
如果(窗口.类名(转换.字符型转整型(字符句柄集[1],0))=="Edit")
句柄=转换.字符型转整型(字符句柄集[1])
跳出
如果结束
i = i + 1
循环结束
  窗口.提交按键(句柄,13)
窗口.提交字符串(句柄,"你好。。"+转换.整型转字符型(句柄))
窗口.提交按键(句柄,13)
返回 0
功能结束
功能逻辑型开始_点击()
//这里添加你要执行的代码
线程句柄=线程.开启("线程操作.线程方法","")//k开启线程
返回真
//函数返回语句
功能结束
功能逻辑型退出_点击()
//这里添加你要执行的代码
辅助.退出()
返回真
//函数返回语句
功能结束

功能逻辑型按钮0_点击()
//这里添加你要执行的代码
//实现暂停与恢复的功能方法
如果(!是否暂停)
线程.暂停(线程句柄)
是否暂停=真
否则
线程.恢复(线程句柄)
是否暂停=假
如果结束
返回真
功能结束
功能逻辑型按钮1_点击()
//这里添加你要执行的代码
线程.关闭(线程句柄)
返回真
功能结束

空间结束
//空间结束语句
//运行的时候出现了数组调用超过界限，要改那个参数才不会越界啊

作者: cylhb 时间: 2012-12-29 18:58
先下断点,然后调试运行,单步执行,看可能到哪一步出错,注意观察参数的值变化.

作者: 尛情哥 时间: 2012-12-29 19:28
你是开一个记事本的时候才提示越界? 开2个以上记事本就不提示越界吧
字符句柄集[1]改成i定义的时候那里不用改

作者: a1041946110 时间: 2012-12-29 19:47
回复 3楼尛情哥的帖子

开几个都是提示越界的

作者: 尛情哥 时间: 2012-12-29 20:02
回复 4楼a1041946110的帖子

刚才没仔细看 ,把你代码测试了下
统.枚举("Edit",1)这个不是记事本的类名要改成Notepad
字符型返回值=系统.枚举("l字符句柄",3) //父窗口枚举子窗口还有这里改成这个字符句柄外面不需要加引号

作者: a1041946110 时间: 2012-12-29 21:04
还是不行，那个("字符句柄",3)引号去掉就找不到句柄了

作者: 尛情哥 时间: 2012-12-29 21:56

你是开一个记事本的时候才提示越界? 开2个以上记事本就不提示越界吧
字符句柄集[1]改成i定义的时候那里不用改
尛情哥发表于 2012-12-29 19:28:40

把这个也改掉....

作者: 尛情哥 时间: 2012-12-29 21:58
回复 6楼a1041946110的帖子

把1改成 i 我前面就说了不然枚举不出来 edit 这个类名的窗口句柄

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)