精易论坛

标题: 求易语言翻译火山代码 [打印本页]

---

作者: xiaoka2018    时间: 2023-5-3 20:28
标题: 求易语言翻译火山代码

  

子程序名	返回值类型	公开	备 注
消息循环	整数型

变量名	类 型	静态	数组	备 注
msg	MSG

判断循环首 (GetMessage (msg, 0, 0, 0) ≠ 0)
TranslateMessage (msg)
DispatchMessage (msg)
判断循环尾 ()
返回 (msg.wParam)

.版本 2<br /> <br /> .子程序 消息循环, 整数型, 公开<br /> .局部变量 msg, MSG<br /> <br /> .判断循环首 (GetMessage (msg, 0, 0, 0) ≠ 0)<br />     TranslateMessage (msg)<br />     DispatchMessage (msg)<br /> .判断循环尾 ()<br /> 返回 (msg.wParam)

.版本 2

.数据类型 MSG
    .成员 hwnd, 整数型
    .成员 message, 整数型
    .成员 wParam, 整数型
    .成员 lParam, 整数型
    .成员 time, 整数型
    .成员 pt, POINT



.版本 2

.DLL命令 GetMessage, 整数型, "user32", "GetMessageA", , 　
    .参数 lpMsg, MSG
    .参数 hwnd, 整数型
    .参数 wMsgFilterMin, 整数型
    .参数 wMsgFilterMax, 整数型

.DLL命令 TranslateMessage, 整数型, "user32", "TranslateMessage"
    .参数 lpMsg, MSG

.DLL命令 DispatchMessage, 整数型, "user32", "DispatchMessageA"
    .参数 lpMsg, MSG

---

作者: 揰掵佲    时间: 2023-5-3 20:28

[XML] 纯文本查看 复制代码

<火山程序 类型 = "通常" 版本 = 1 />





方法 消息循环 <静态 类型 = 变整数 @禁止流程检查 = 真>

{

    @ MSG CurrMsg;

    @ while(::GetMessage(&CurrMsg,NULL,0,0)){

    @ ::TranslateMessage(&CurrMsg);

    @ ::DispatchMessage(&CurrMsg);

    @ }

    @ return (INT_P)CurrMsg.wParam;



}

---

作者: 星星之夜    时间: 2023-5-3 20:34
你直接说功能，火山代码粘贴C++代码即可

---

作者: xiaoka2018    时间: 2023-5-3 20:43

星星之夜 发表于 2023-5-3 20:34
你直接说功能，火山代码粘贴C++代码即可

还有一种叫法好像是叫消息同步。

---

作者: 恶魔の佐翼    时间: 2023-5-3 20:52
百du搜C的消息循环,复制粘贴然后前面加@就差不多了

---

作者: xiaoka2018    时间: 2023-5-3 20:59

恶魔の佐翼 发表于 2023-5-3 20:52
百du搜C的消息循环,复制粘贴然后前面加@就差不多了

MSG msg;
while(GetMessage(&msg,NULL,0,0))
{
         TranslateMessage(&msg);
         DispatchMessage(&msg);  
}

百du搜到的是这种，应该怎么改？

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4