第一个很无知的问题

weiyuqiang

  

子程序名	返回值类型	公开	备 注
执行线程

' 假设第一种方案，用线程
计次循环首 (100, )
启动线程 (&功能, , )
处理事件 ()
计次循环尾 ()
' 假设第二种方案，直接调用子程序
计次循环首 (100, )
功能 ()
处理事件 ()
计次循环尾 ()

子程序名	返回值类型	公开	备 注
功能

变量名	类 型	静态	数组	备 注
a	整数型
b	整数型
c	整数型

置随机数种子 ()
a ＝ 1
b ＝ 取随机数 (1, 5)
c ＝ a ＋ b
调试输出 (c)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .子程序 执行线程<br /> <br /> ' 假设第一种方案，用线程<br /> <br /> .计次循环首 (100, )<br />     启动线程 (&功能, , )<br />     处理事件 ()<br /> .计次循环尾 ()<br /> <br /> ' 假设第二种方案，直接调用子程序<br /> <br /> .计次循环首 (100, )<br />     功能 ()<br />     处理事件 ()<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 功能<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 c, 整数型<br /> <br /> 置随机数种子 ()<br /> a ＝ 1<br /> b ＝ 取随机数 (1, 5)<br /> c ＝ a ＋ b<br /> 调试输出 (c)

已知第一种方案，用启动线程，执行的很快
那么如果用第二种方案，都要等待子程序执行完，再一次的进行循环
有没有办法调用子程序，也执行的很快

熊猫xpanda

方法一就是同时执行100遍 功能
方法二就是依次执行功能 100遍

多线程的好处就是能高效的完成任务但会加重计算机的运算负担，如果不采用多线程可以尝试使用消息队列化

  

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

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

g_pOldProc ＝ GetWindowLongA (取窗口句柄 (), #GWL_WNDPROC )
SetWindowLongA (取窗口句柄 (), #GWL_WNDPROC, 到数值 (&WindowProc))

子程序名	返回值类型	公开	备 注
WindowProc	整数型
参数名	类 型	参考	可空	数组	备 注
hwnd	整数型
msg	整数型
wparam	整数型
lparam	整数型

判断 (msg ＝ #通知消息 )
判断 (wparam ＝ #通知类型_执行功能 )
功能 ()






返回 (CallWindowProcA (g_pOldProc, hwnd, msg, wparam, lparam))

子程序名	返回值类型	公开	备 注
执行线程

m_hWnd ＝ 取窗口句柄 ()
PostMessageA (m_hWnd, #通知消息, #通知类型_执行功能, )

子程序名	返回值类型	公开	备 注
功能

' 这里存放你要执行的函数代码

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 m_hWnd, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> g_pOldProc ＝ GetWindowLongA (取窗口句柄 (), #GWL_WNDPROC)<br /> SetWindowLongA (取窗口句柄 (), #GWL_WNDPROC, 到数值 (&WindowProc))<br /> <br /> <br /> .子程序 WindowProc, 整数型<br /> .参数 hwnd, 整数型<br /> .参数 msg, 整数型<br /> .参数 wparam, 整数型<br /> .参数 lparam, 整数型<br /> <br /> .判断开始 (msg ＝ #通知消息)<br />     .判断开始 (wparam ＝ #通知类型_执行功能)<br />         功能 ()<br />     .默认<br /> <br />     .判断结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> <br /> 返回 (CallWindowProcA (g_pOldProc, hwnd, msg, wparam, lparam))<br /> <br /> .子程序 执行线程<br /> <br /> m_hWnd ＝ 取窗口句柄 ()<br /> PostMessageA (m_hWnd, #通知消息, #通知类型_执行功能, )<br /> <br /> <br /> .子程序 功能<br /> <br /> ' 这里存放你要执行的函数代码

weiyuqiang

熊猫xpanda 发表于 2025-3-30 15:47
方法一就是同时执行100遍 功能
方法二就是依次执行功能 100遍

好谢谢哥 没看懂

汉族

这个你可以看你的具体使用环境具体怎么样，不要为了这例子而纠结这些问题所在的方位，真正需要传递的是多线程的数据可以使用精易模块的多参数传递、

weiyuqiang

汉族 发表于 2025-3-30 16:51
这个你可以看你的具体使用环境具体怎么样，不要为了这例子而纠结这些问题所在的方位，真正需要传递的是多线 ...

但是我又想让 子程序传参回来，同时又想有多线程那个速度

笨来无一悟

更快的方法是 启动5个线程 每个线程里面循环20次多线程 并不能同时执行 100线程会拥堵的

笨来无一悟

多线程实际没有少线程的速度快
https://bbs.125.la/forum.php?mod=viewthread&tid=14825952
(出处: 精易论坛)

lyie15

weiyuqiang 发表于 2025-3-30 16:53
但是我又想让 子程序传参回来，同时又想有多线程那个速度

再增加一个子程序，放在线程里运行。并等待传参回来再处理。

乐鱼驴

初略看了一下你以前的提问,
预估你问的问题并不能解决你想的问题

7ian

直接用第一种方法就行了，为什么纠结第二个？我猜是因为你的子程序有有些参数不能给线程调用，才发出的问题