TC 多线程

liexren

    线程2=线程.开启("我的程序.线程方法2","")

    如果结束

以上2个代码有错误
另外复制代码进去的时候大家要注意”我的程序“这个空间名要改为你开始创建时候的空间名，不然点开始会没有反应的

silei3058

支持TC

slz336

支持啊！下载了

actor1005

哥们，你这临界区有问题啊，应该这样的吧。
var CriHandle
function visit(visitthread)
    criticalenter(CriHandle)
    for(var i = 0; i < 4; i++)
        //messagebox("线程"+ visitthread +"访问")
        traceprint("线程"& visitthread &"访问")
    end
   
    criticalleave(CriHandle)
    return true
   
   
end


function button0_click()
//这里添加你要执行的代码
        CriHandle=criticalcreate()
   
        var handleA=threadbegin("visit","A")
    var handleB=threadbegin("visit","B")
   
        traceprint("////////////////////分隔线/////////////////////////")


        //threadwaitfor(handleA,60*1000)//最长等待线程句柄1的线程执行1分钟
    //threadwaitfor(handleB,60*1000)//最长等待线程句柄2的线程执行1分钟     

        //必须加上下面语句,否则线程还没运行结束就删除临界区,程序崩溃
    while(!threadgetstatus(handleA)&&!threadgetstatus(handleB)==true)
                criticaldelete(CriHandle)
                exit()      
    end
   
    return true
   
end