TC官方合作论坛

标题: 在线翻译器带源码 [打印本页]

作者: 312120292 时间: 2015-12-11 16:06
标题: 在线翻译器带源码
只是中转了一下而已！不喜忽喷·······

作者: 312120292 时间: 2015-12-11 16:10
变量线程ID

功能执行()
控件是否有效("开始翻译",假)
变量句柄=窗口获取自我句柄()
变量标题=窗口获取标题(句柄)
窗口设置标题(句柄,"此软件,纯属娱乐,各位忽喷!")
控件关闭子窗口("翻译",123)
等待(500)
变量控件句柄=控件打开子窗口("翻译")
等待(10)
窗口设置位置(控件句柄,-2000,-2000)
等待(10)
变量翻译前 = 编辑框获取文本("翻译前")
编辑框设置文本("翻译后","")
变量待翻译 = 下拉框获取选项("待翻译")
变量翻译 = 下拉框获取选项("翻译")
选择(待翻译)
      条件 0
      待翻译 = "auto"
      条件 1
      待翻译 = "ara"
      条件 2
      待翻译 = "est"
      条件 3
      待翻译 = "bul"
      条件 4
      待翻译 = "pl"
      条件 5
      待翻译 = "dan"
      条件 6
      待翻译 = "de"
      条件 7
      待翻译 = "ru"
      条件 8
      待翻译 = "fra"
      条件 9
      待翻译 = "fin"
      条件 10
      待翻译 = "kor"
      条件 11
      待翻译 = "nl"
      条件 12
      待翻译 = "cs"
      条件 13
      待翻译 = "rom"
      条件 14
      待翻译 = "pt"
      条件 15
      待翻译 = "jp"
      条件 16
      待翻译 = "swe"
      条件 17
      待翻译 = "slo"
      条件 18
      待翻译 = "th"
      条件 19
      待翻译 = "wyw"
      条件 20
      待翻译 = "spa"
      条件 21
      待翻译 = "el"
      条件 22
      待翻译 = "hu"
      条件 23
      待翻译 = "zh"
      条件 24
      待翻译 = "en"
      条件 25
      待翻译 = "it"
      条件 26
      待翻译 = "yue"
      条件 27
      待翻译 = "cht"
结束

选择(翻译)
      条件 0
      翻译 = "ara"
      条件 1
      翻译 = "est"
      条件 2
      翻译 = "bul"
      条件 3
      翻译 = "pl"
      条件 4
      翻译 = "dan"
      条件 5
      翻译 = "de"
      条件 6
      翻译 = "ru"
      条件 7
      翻译 = "fra"
      条件 8
      翻译 = "fin"
      条件 9
      翻译 = "kor"
      条件 10
      翻译 = "nl"
      条件 11
      翻译 = "cs"
      条件 12
      翻译 = "rom"
      条件 13
      翻译 = "pt"
      条件 14
      翻译 = "jp"
      条件 15
      翻译 = "swe"
      条件 16
      翻译 = "slo"
      条件 17
      翻译 = "th"
      条件 18
      翻译 = "wyw"
      条件 19
      翻译 = "spa"
      条件 20
      翻译 = "el"
      条件 21
      翻译 = "hu"
      条件 22
      翻译 = "zh"
      条件 23
      翻译 = "en"
      条件 24
      翻译 = "it"
      条件 25
      翻译 = "yue"
      条件 26
      翻译 = "cht"
结束
网页跳转("浏览器0","http://fanyi.baidu.com/?aldtype=16047#"&待翻译&"/"&翻译&"/","翻译")
等待(1000)
网页元素输入("浏览器0",翻译前,"tag:TEXTAREA&id:baidu_translate_input&type:textarea&index:0&class:textarea","翻译")
等待(1000)
网页元素点击("浏览器0","tag:A&id:translate-button&index:18&class:trans-btn trans-btn-zh","翻译")
等待(1000)
变量翻译后=网页元素获取("浏览器0","text","tag:P&index:12&class:ordinary-output target-output","翻译")
编辑框设置文本("翻译后",翻译后)
窗口设置标题(句柄,"翻译完成")
等待(100)
// 窗口设置标题(句柄,"定做辅助,请加QQ:312120292")
控件是否有效("开始翻译",真)
结束

作者: 爱上老公 时间: 2015-12-11 16:10
特地来顶你

作者: 爱上老公 时间: 2015-12-11 16:11
再占一楼

作者: 爱上老公 时间: 2015-12-11 16:11
继续占楼

作者: 312120292 时间: 2015-12-11 16:12

源文件传不上去坑到了

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