关于4.30模块开线程的问题,求教大神?

xuhekl

看了很多资料,还是不明白多线程的使用,求大神指导下,目的很简单,开一个线程

运行子程序,能随时关闭此线程的运行.

比如我有 4个子程序    a(),b(),c(),d()     a调用  b,c,d 现在我要开线程运行a,

公用.线程_启动 (&a,1,返回线程1)'  这一步能正常工作.

但是如果中途我要把此线程关闭,就会出问题

公用.线程_销毁 (返回线程1) '运行此命令以后,软件仍然不会停止工作,继续执行.

御风软件

线程销毁，是强制销毁的，但不一定是马上结束的

如果这个一直无法关闭，那可能是命令出问题了，你可以试试精易模块的，线程_启动，线程_关闭

xuhekl

我现在就是用的精易vip模块4.30版.问题中的命令也是用的模块里的命令,但是就是关了线程,程序还要执行.

咪兔

xuhekl 发表于 2015-10-13 10:29
我现在就是用的精易vip模块4.30版.问题中的命令也是用的模块里的命令,但是就是关了线程,程序还要执行.

用数组不可以么？

天中小和尚

这个最好还是附上源码比较好   你这样说  问题应该不太好解决啊

xuhekl

天中小和尚 发表于 2015-10-13 14:45
这个最好还是附上源码比较好   你这样说  问题应该不太好解决啊

.版本 2

.程序集 窗口程序集1
.程序集变量 hwnd, 整数型

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

' hwnd ＝ 线程_启动 (&b, 0)  '
公用.线程_启动 (&b, 0, hwnd)

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

' 输出调试文本 (线程_销毁 (hwnd))
输出调试文本 (公用.线程_销毁 (hwnd))

.子程序 a

a ()


.子程序 b
.局部变量 i, 整数型

.计次循环首 (20, i)
    延时 (500)
    输出调试文本 (i)
.计次循环尾 ()
'注释的是3.12模块的命令,能正常开启和销毁,销毁后,软件停止,
'现在使用的是4.12模块的命令,能正开启,但是销毁会提示假.

Will

TerminateThread