消息在多线程中实现异步通信

本文详细介绍了如何在Delphi中自定义消息ID,并将其与多线程结合进行消息处理。通过实现消息接收处理函数和多线程类,展示了消息如何在不同线程间传递和处理。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

1)自定义消息ID

#define WM_MYMESSAGE WM_APP+1

2)消息接收处理函数

void __fastcall CMMessage(TMessage &msg);

void __fastcall TActFrm::CMMessage(TMessage &msg)
{
g_logFile.print("receive msg.\n");
if(msg.WParam == 0){

}else if(msg.WParam == 1){


}
}

3)消息交给CMMessage 函数处理

BEGIN_MESSAGE_MAP
VCL_MESSAGE_HANDLER(WM_MYMESSAGE,TMessage,CMMessage)
//决定WM_MYMESSAGE消息交给CMMessage 函数处理
END_MESSAGE_MAP(TActiveForm)


4)在多线程文件中头文件如下

ifndef ThreadH
#define ThreadH
//---------------------------------------------------------------------------
#include <Classes.hpp>
//---------------------------------------------------------------------------

class TMyThread : public TThread
{
private:
LPVOID m_handle;
protected:
void __fastcall Execute();
void __fastcall FtpDwonLoad(); //自定义函数
public:
__fastcall TMyThread(bool CreateSuspended,LPVOID handle);


void __fastcall DwonLoad(char *sourceFile,char* strFile); //DownFile
};

#endif

5)多线程的cpp文件如下

__fastcall TMyThread::TMyThread(bool CreateSuspended,LPVOID handle)
: TThread(CreateSuspended)
{
m_handle = handle;
}

void __fastcall TMyThread::Execute()
{
DwonLoad(gDown,gListen);
PostMessage(m_handle,WM_MYMESSAGE,0,0);

}

void __fastcall TMyThread::DwonLoad(char *sourceFile,char* strFile)
{

}


6)多线程的使用:

先定义 TMyThread *thread1;

初始化:thread1=new TMyThread(true,Handle);

后启动:thread1->Resume();

最后停止: thread1->Terminate();



评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值