论坛 › 『 提问交流 』 › VB 支持多线程的DLL,大家研究下看能否用在Au3

nxbigdaddy 发表于 2010-1-26 18:41:51

等待高手，等待……

78391493 发表于 2010-1-26 22:05:15

回复 7# akmm88

老大 不是这样玩滴

OOP的专利 AU3做不到，除非重新设计DLL接口

rchockxm 发表于 2010-1-26 22:10:12

據 au 論壇的幾位 mvp 說，因為 au 的線程不是安全的，所以...

benkel 发表于 2010-2-9 17:22:00

本帖最后由 benkel 于 2010-2-9 17:28 编辑

VBS的代码：
Set pthread0 = CreateObject("MT32.Thread")
Dim a
a = 10
pThread0.CreateThread ME, "Test" , a

Function Test(DummyArgument)
for w = DummyArgument to 20 step 1
WScript.Echo w
next
End Function

WScript.Echo a

在AU3上实在整不出来，看说明文档，MT32调用的是对象里的线程函数，AU3自身貌似不是对象还是咋D反正不明白…………

benkel 发表于 2010-2-9 17:31:30

本帖最后由 benkel 于 2010-2-9 17:33 编辑

如果AU3能像VB或VBS那样把自身当成一个“ME”的对象，那这东东应该可能也许或者就可以在AU3调用。。。。。。。。。。。。。


$obj=ObjCreate("MT32.Thread")
$tH= $obj.CreateThread(ME,"th1","10")
ConsoleWrite($tH)

For $i=1 To 20
      ConsoleWrite($i&@CRLF)
      Sleep(200)
Next
Func th1($p)
      For $i=5000 To 10000 step $p
      ConsoleWrite($i&@CRLF)
      Sleep(200)
Next
EndFunc

rikthhpgf2005 发表于 2010-3-23 16:38:05

==高手们加油

zhrh88 发表于 2010-4-3 08:14:46

把au3本身的进程代替me试试

wuweixian 发表于 2010-5-7 14:58:43

不错有点思路了

hughman 发表于 2010-5-15 15:36:08

期待高手出现

查看完整版本: VB 支持多线程的DLL,大家研究下看能否用在Au3