关于按钮 开始停止问题

奔跑的老蜗牛

如图     点击暂停  还一直在运行

sunsir

沿用了你的写法，调用的精易模块 ，感觉这样写有漏洞，建议多加几个按钮分别执行开始，暂停，继续等操作。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
线程id	整数型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果 (按钮1.标题 ＝ “开始”)
线程id = 线程_启动 (&ARR初始化, , )
按钮1.标题 ＝ “暂停”
线程_挂起 (线程id)
按钮1.标题 ＝ “开始”

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 线程id, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (按钮1.标题 ＝ “开始”)<br />     线程id = 线程_启动 (&ARR初始化, , )<br />     按钮1.标题 ＝ “暂停”<br /> .否则<br />     线程_挂起 (线程id)<br />     按钮1.标题 ＝ “开始”<br /> .如果结束

hatsunemiku

暂停线程()

sunsir

老大你只改了按钮标题，然而你并没有暂停线程啊。。。

奔跑的老蜗牛

sunsir 发表于 2018-11-16 21:00
老大你只改了按钮标题，然而你并没有暂停线程啊。。。

大哥  小弟第一次弄  关键就是不知道怎么暂停

奔跑的老蜗牛

hatsunemiku 发表于 2018-11-16 20:55
暂停线程()

难者不会   会者不难，，，

奔跑的老蜗牛

贴上全部代码  往表哥们指导。。
.版本 2
.支持库 ERawSock
.支持库 EThread
.支持库 spec
.支持库 iext

.程序集 窗口程序集1
.程序集变量 arp协yi, ARP协yi
.程序集变量 以太网头, 以太网头
.程序集变量 arp头, ARP头

.子程序 __启动窗口_创建完毕




.子程序 _按钮1_被单击

.如果真 (按钮1.标题 ＝ “开始”)
    启动线程 (&ARP初始化, , )
    按钮1.标题 ＝ “暂停”
    返回 ()
.如果真结束
.如果真 (按钮1.标题 ＝ “暂停”)


    按钮1.标题 ＝ “开始”
    返回 ()
.如果真结束


.子程序 ARP初始化
.局部变量 arp协yi打开, 逻辑型




.子程序 取arp信息
.局部变量 arp数据, 字节集
.局部变量 类型, 文本型
.局部变量 SY, 整数型
.局部变量 ip, 文本型, , "0"
.局部变量 aa, 整数型

arp数据 ＝ arp协yi.接收 ()
arp协yi.取以太网头 (arp数据, 以太网头)
.如果真 (以太网头.帧类型 ＝ #ARP常量.ARP协yi)
    arp协yi.取ARP头 (arp数据, arp头)
    调试输出 (arp头.发送端IP地址)
    调试输出 (arp头.目的IP地址)
    .如果真 (arp头.操作类型 ＝ 1)
        aa ＝ 超级列表框2.插入表项 (, , , , , )
        超级列表框2.置标题 (aa, 0, arp头.发送端IP地址)
        超级列表框2.置标题 (aa, 1, arp头.发送端以太网地址)
        超级列表框2.置标题 (aa, 2, arp头.目的IP地址)
        超级列表框2.置标题 (aa, 3, arp头.目的以太网地址)
        超级列表框2.置标题 (aa, 4, “ARP请求”)
    .如果真结束

.如果真结束
延时 (100)
取arp信息 ()

奔跑的老蜗牛

sunsir 发表于 2018-11-16 21:09
沿用了你的写法，调用的精易模块 ，感觉这样写有漏洞，建议多加几个按钮分别执行开始，暂停，继续等操作。
...

卡死了。。。

易易语

定义一个程序集变量，逻辑型。真就开始，，假就停止。

奔跑的老蜗牛

易易语 发表于 2018-11-16 21:31
定义一个程序集变量，逻辑型。真就开始，，假就停止。

求具体代码 谢谢