TC官方合作论坛

 找回密码
 立即注册
查看: 680|回复: 3

[问题] 这个代码哪里错了,求高手帮忙修改~

[复制链接]
发表于 2013-8-31 01:19:27 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
空间 自动

dm=com("dm.dmsoft")
变量 账号临界句柄
字符型 窗口名

功能 导入()

    变量 主窗口句柄数据=数组[]
    变量 主窗口下标
    变量 子窗口句柄字符串
    变量 需操作窗口句柄字符串
    变量 子窗口句柄数组=数组[]
    变量 传参数组=数组[]

    字符串.分割(需操作窗口句柄字符串,",",传参数组)
    数组空间.大小(传参数组,主窗口下标)
    遍历(i=0;i<主窗口下标;i++)

        表格.设置内容("表格0",i+1,0,i+1)
        表格.设置内容("表格0",i+1,4,"启动中!")
        线程句柄=线程.开启("自动.文本操作",传参数组)


    遍历结束

功能结束

功能 导入文件()
    账号数组=数组[]
    数组大小
    账号文本=文件.读文件(浏览框.获得("浏览框0"))

    调试输出(账号文本)
    字符串.分割(账号文本,"\r\n",账号数组)
    调试输出(账号数组[0])
    数组空间.大小(账号数组,数组大小)
    列表框.清空("列表框0")
    遍历(i=0;i<数组大小;i++)
        列表框.增加文本("列表框0",账号数组)
    遍历结束
功能结束

功能 获取无使用账号()
    账号文本
    线程.进入临界区(账号临界句柄)
    遍历(i=0;i<列表框.得到个数("列表框0");i++)
        账号文本=列表框.获得文本("列表框0",i)
        是否找到=字符串.查找字符串(账号文本,"已使用")
        如果(是否找到==-1)
            列表框.删除文本("列表框0",i)
            列表框.插入文本("列表框0",账号文本&"|已使用",i)

            跳出
        否则
            账号文本=null

        如果结束
    遍历结束

    线程.离开临界区(账号临界句柄)
    返回  账号文本
功能结束

功能 文本操作(传入参数)
    变量 传入数组
    变量 x,y
    变量 窗口句柄
    变量 子窗口句柄数组=数组[]
    变量 子窗口句柄字符串
    变量 账号数组=数组[]

    字符串.分割(传入参数,"|",传入数组)
    窗口句柄=传入数组[0]
    序号=传入数组[1]
    临时文本=自动.获取无使用账号()
    如果(临时文本==null)
        表格.设置内容("表格0",序号+1,3,"账号已用完")
        返回 (0)
    否则
        字符串.分割(临时文本,",",账号数组)
        表格.设置内容("表格0",序号+1,0,账号数组[0])
        表格.设置内容("表格0",序号+1,1,账号数组[1])



    如果结束



功能结束


功能 开始_点击()

    线程.开启("自动.导入","")

功能结束


功能 退出_点击()
    线程.关闭("自动.导入","")
    辅助.退出()

功能结束


功能 按钮0_点击()

    线程.开启("自动.导入文件","")

功能结束


空间结束

回复

使用道具 举报

 楼主| 发表于 2013-9-1 00:36:39 | 显示全部楼层
???????????????
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-9-1 11:31:40 | 显示全部楼层
有没有人啊&#183;&#183;&#183;&#183;&#183;&#183;
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-9-5 10:56:19 | 显示全部楼层
都沉到海底了
回复 支持 反对

使用道具 举报

发表于 2013-9-5 11:39:52 | 显示全部楼层
这个实在有心帮忙,可是看到这么长的代码,我又受到了打击,表示看不懂!生成的时候没有错误提示吗,提示的是什么发上来一起看看哈,光是一段代码发出来,不知道该从何处着手解决问题啊
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-9-24 05:59 , Processed in 0.041028 second(s), 23 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表