TC官方合作论坛

标题: 求助，为什么着着视频做的，我的运行不了呢？ [打印本页]
作者: xianjixin    时间: 2012-9-19 18:39
标题: 求助，为什么着着视频做的，我的运行不了呢？
是第六课  用滑块控制进度条的速度
源码是这样的

空间 测试空间
//定义默认空间
整型 时间
功能 逻辑型 滑块滚动()
    时间=滑块.得到位置("滑块0")
    整型 位置=0
    循环(真)
        进度条.设置进度("进度条0",位置)
        进度条.设置进度("进度条1",位置)
        辅助.等待(时间)
        位置=位置+10
        如果(位置>=100)
            位置=0
        如果结束
            
//进度的值不能小于0和大于99
    循环结束
返回 真
功能结束



功能 逻辑型 开始_点击()
线程.开启("测试空间.滑块滚动","")

返回 真
//函数返回语句
功能结束

功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()

返回 真
//函数返回语句
功能结束
功能 逻辑型 滑块0_鼠标释放()
//这里添加你要执行的代码
时间=滑块.得到位置("滑块0")
返回 真
功能结束
空间结束
//空间结束语句

作者: shine宝宝    时间: 2012-9-19 18:41
TC官网视频教程配套【视频+源码】下载
http://bbs.tyuyan.com/thread-16976-1-1.html
作者: xianjixin    时间: 2012-9-19 18:43
好的
我下载了  现在就去找下哪里出 错了
谢谢LS的
作者: xianjixin    时间: 2012-9-19 18:48
回复 2楼shine宝宝的帖子

能告诉我一下是打开哪个文件吗？我打开第六课里的测试控件2的那个TC项目文件以后，里面什么都没有呀。
作者: shine宝宝    时间: 2012-9-19 18:57
- - 我有啊  

这是测试控件2.tcproj 里的
  1. 空间 测试控件2
  3. 整型 时间
  5. 功能 逻辑型 滑块滚动()
  6. 时间 = 滑块.得到位置("滑块0")
  7. 整型 位置 = 0
  8. 循环(真)
  9.     进度条.设置进度("进度条0",位置)
  10.     进度条.设置进度("进度条1",位置)
  11.     辅助.等待(时间*10)
  12.     位置 = 位置 + 5
  13.     如果(位置>=100)
  14.         位置 = 0
  15.     如果结束
  16. 循环结束
  18. 返回 真
  19. 功能结束
  22. 功能 逻辑型 开始_点击()
  23. ////这里添加你要执行的代码
  24. //进度条.设置进度("进度条0",10)
  25. ////进度的值不能小于0和大于99
  26. //进度条.设置进度("进度条0",10)
  27. ////进度的值不能小于0和大于99
  28. //整型 位置=滑块.得到位置("滑块0")
  29. 线程.开启("测试控件2.滑块滚动","")
  31. 返回 真
  32. //函数返回语句
  33. 功能结束
  35. 功能 逻辑型 退出_点击()
  36. //这里添加你要执行的代码
  37. 辅助.退出()
  39. 返回 真
  40. //函数返回语句
  41. 功能结束
  44. 功能 逻辑型 列表框0_选择改变()
  45. //这里添加你要执行的代码
  46. //列表框.得到选项("列表框0")  
  47. 辅助.消息框(列表框.得到选中文本("列表框0") )
  48. 返回 真
  49. 功能结束
  52. 功能 逻辑型 滑块0_鼠标释放()
  53. 时间 = 滑块.得到位置("滑块0")
  54. 返回 真
  55. 功能结束
  57. 空间结束
  58. //空间结束语句
复制代码
作者: xianjixin    时间: 2012-9-19 19:02
谢谢你了  大好人啊
发你一张好人卡



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