Foxtable(狐表)用户栏目专家坐堂 → 在某个线程上创建的控件不能成为在另一个线程上创建的控件的父级


  共有3385人关注过本帖树形打印复制链接

主题:在某个线程上创建的控件不能成为在另一个线程上创建的控件的父级

帅哥哟,离线,有人找我吗?
huangxueyao
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:443 积分:3530 威望:0 精华:0 注册:2013/2/9 12:45:00
在某个线程上创建的控件不能成为在另一个线程上创建的控件的父级  发帖心情 Post By:2018/11/15 14:02:00 [只看该作者]

啥意思,何解?

 回到顶部
帅哥哟,离线,有人找我吗?
xndd
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:517 积分:4319 威望:0 精华:0 注册:2014/11/26 15:23:00
  发帖心情 Post By:2018/11/15 14:03:00 [只看该作者]

不能用线程再去引用或者创建第二个线程,他们是平级的

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/15 15:09:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
huangxueyao
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:443 积分:3530 威望:0 精华:0 注册:2013/2/9 12:45:00
  发帖心情 Post By:2018/11/15 16:21:00 [只看该作者]

计划任务A:

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20181115161740.png
图片点击可在新窗口打开查看


代码:

Try
    
    Dim tdd As Date = Date.Today
    Dim tdt As Date = Date.now
    Dim Arys  As List(Of String())
    
    Dim cmd As new sqlcommand
    cmd.connectionname = gs_strActiveConn
    cmd.commandtext = "sel ect * from 任务计划 where 执行 = 0 or 执行 is null"  '如果已经任务设置中已经暂停,那么计划中尚未执行的任务也不再执行.
    Dim db As DataTable = cmd.executereader(True)
    
    Arys  = db.GetValues("任务ID|任务名称|任务函数","计划日期 = # " & tdd & " # and 计划时间 <= # " & tdt & " #")
    If Arys.Count > 0 Then
        Output.Logs("AutoLog").Add("自动数据处理开始" & Now.ToString("yyyy-MM-dd HH:mm:ss.fffff"))
        For Each Ary As String() In Arys
            Output.Show(Ary(0) & "|" & Ary(1) & "|" & Ary(2))
            Dim rwid As Integer = Ary(0)
            Dim rwmc As String = Ary(1)
            Dim rwhs As String = Ary(2)
            Dim hscs As String = rwhs & "," & rwid & "," & rwmc
            Output.Logs("AutoLog").Add("自动数据处理"  & hscs & "开始:"   & Now.ToString("yyyy-MM-dd HH:mm:ss.fffff"))
            'CallFun_Thread(hscs)
            Functions.AsyncExecute(rwhs,rwid,rwmc) '多线程
            Threading.Thread.Sleep(3000) '必要时须延时一些
            Dim filter As String ="任务ID = " & rwid & " And 计划时间 <= #" & tdt  & "# "
            db.ReplaceFor("执行",True,filter)
            db.ReplaceFor("执行时间",Date.now,filter)
            db.save
            Output.Logs("AutoLog").Add("自动数据处理"  & hscs & "结束:"   & Now.ToString("yyyy-MM-dd HH:mm:ss.fffff"))
        Next
        Output.Logs("AutoLog").Add("----------------------------------")
        Output.Logs("AutoLog").Save(ProjectPath & "AutoLog.txt",True)
    End If
Catch ex As Exception
    Output.Logs("AutoLog").Add("----------------------------------")
    Output.Logs("AutoLog").Add("自动数据处理"  & ex.Message & "报错:"   & Now.ToString("yyyy-MM-dd HH:mm:ss.fffff"))
    Output.Logs("AutoLog").Save(ProjectPath & "AutoLog.txt",True)
End Try


上图红色部分调用的子函数代码如下:

以下内容是专门发给有点甜浏览



 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/15 21:00:00 [只看该作者]

1、涉及到公共资源的访问(比如表数据),基本是不能用多线程多次执行的。

 

2、必须按照顺序一步一步执行才行。也就是说启动一个线程,在这个线程里面完成所有的操作。


 回到顶部
帅哥哟,离线,有人找我吗?
telek
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:401 积分:3408 威望:0 精华:0 注册:2014/3/10 11:02:00
  发帖心情 Post By:2018/11/15 23:16:00 [只看该作者]

gg

 回到顶部
帅哥哟,离线,有人找我吗?
atiwhl5
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:120 积分:1151 威望:0 精华:0 注册:2019/8/10 1:23:00
  发帖心情 Post By:2020/2/17 4:50:00 [只看该作者]

我也碰到不知道怎么办


 回到顶部
帅哥哟,离线,有人找我吗?
Hopenight
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:847 积分:10700 威望:0 精华:0 注册:2016/5/6 14:34:00
  发帖心情 Post By:2020/5/12 13:42:00 [只看该作者]

我也遇到了这个问题

 回到顶部