张志峰的博客

水滴石川，积少成多。

导航

2017年3月9日

delphi 主线程向子线程发送消息

摘要： while True do begin if not PeekMessage(msg,0,0,0,PM_REMOVE) then begin case MsgWaitForMultipleObjects(1,hCloseEvent,False,INFINITE,QS_ALLINPUT) of WAI 阅读全文

posted @ 2017-03-09 19:38 ╰★张志峰★╮ 阅读(548) 评论(0) 推荐(0)